Macro excel à perfectionner

cedric -  
eriiic Messages postés 24581 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

2 réponses

  1. 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
  2. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    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