Masquer des lignes avec critère (2)

[chris6999]

Bonjour

Je souhaiterais, lorsque j'active une des feuilles de mon fichier (en l'occurrence la feuille "Alerte") que la macro suivante s'exécute :
Afficher toutes les lignes masquées lorsque la valeur"X" est présente dans la colonne H (plage H5 à H2000).

Hier une bonne âme du forum m'a donné un code que j'essaye d'adapter mais sans succès.

Quelqu 'un pourrait-il m'aider ?

Merci d'avance

 

[Pierrot93]

Re : Masquer des lignes avec critère (2)

Bonjour,

le code donné hier était pour une seule référence... en l'état il faut boucler :

Dim i As Long
For i = 5 To Range("H65536").End(xlUp).Row
    If Cells(i, 8).Value = "X" Then Rows(i).Hidden = False
Next i

bon après midi
@+

 

[chris6999]

Re : Masquer des lignes avec critère (2)

Merci beaucoup Pierrot

Cela fonctionne nickel. Je garde précieusement ces codes dans ma boite à outil excel

Bonne fin de journée
Cordialement