Masquer lignes suivant date

[jean de chez claude]

Bonjour
Sur le tableau ci-joint je souhaiterais faire apparaître que les lignes qui on une date équivalente à celle portée en B5 de la feuille 2 (ou masquer les autres) je voudrais que cela soit automatique afin d’insérer le processus à la suite d’une macro existante.
Merci pour votre aide

 

[Catrice]

Re : Masquer lignes suivant date

Bonsoir,

Ci-joint un exemple avec un filtre

 

[gilbert_RGI]

Re : Masquer lignes suivant date

Bonjour,

si ce code peut aider ???

à mettre dans un module et lui faire appel par n'importe quelle procédure

Sub affiche_tout()
    Cells.EntireRow.Hidden = False
End Sub
Sub masque_ligne_entiere()
Sheets(1).Select
    For i = 2 To [H65536].End(xlUp).Row
    
        If Cells(i, 8).Value <> Sheets(2).[b5].Value Then
            Rows(i).Hidden = True
        End If
    Next i
End Sub

 

[jean de chez claude]

Re : Masquer lignes suivant date

Bonjour à tous
C'est Ok , ça fonctionne.
Merci pour votre aide
@+