Macro excel à perfectionner

cedric -  
eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour à tous,

J'ai vraiment besoin de vous pour une macro excel.

Je souhaite que toutes les valeurs "" dans la ligne 8 soient automatiquement masquées.

j'ai tenter cette macro mais elle ne fonctionne pas snif:

sub colonne

if range("h8" & hs87) ="" then
columns ("h:hs"). entire.Column.hidden = true
end if
end sub

quelqu'un pourrait il m'aider ?

un grand merci d'avance

A voir également:

2 réponses

ccm81 Messages postés 11033 Statut Membre 2 434
 
bonjour

If Range("H8") = "" And Range("H9") = "" Then
  Columns("H:H").EntireColumn.Hidden = True
End If

si une seule des cellules H8 ou H7 vide suffit à cacher "H", remplcer and par or

bonne suite
0
eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   7 282
 
Bonsoir,

et si tu as de nombreuses colonnes à tester :
Sub masquerCol()
    Dim col As Long
    For col = 8 To 227
        If Cells(8, col) = "" Then Columns(col).Hidden = True
    Next col
End Sub

eric
0