Remasquer des lignes

Bonjour

Le code ci-dessous fonctionne bien,ce que je cherche à faire

c'est que si E3 et G3 ne correspondent pas les lignes restent masquées

Merci pour votre aide

Private Sub Worksheet_Change(ByVal Target As Range)
     If Intersect(Target, Range("E3")) Is Nothing Then Exit Sub
If [E3] = "004635N" And [G3] = "123" Then
Rows("8:100").EntireRow.Hidden = False

End If
End Sub

Bonjour,

PAs sûr d'avoir bien compris Si vous mettez ceci juste avant le END IF ?

Else: Rows("8:100").EntireRow.Hidden = True

Crdlt

Bonjour Dan

Merci pour ton aide .

Maintenant autre question cette ligne E3 est un identifiant G3 un Mdp ,

Comment je peux modifier mon code je vais avoir plusieurs identifiant et code differents

qui n'affichent pas les mêmes lignes

If [E3] = "004635N" And [G3] = "123" Then

Comment je peux modifier mon code je vais avoir plusieurs identifiant et code differents...qui n'affichent pas les mêmes lignes

Je n'ai pas compris ce que vous voulez faire.
Que voulez-vous dire par "qui n'affichent pas les mêmes lignes"

expliquez-moi comment vous fonctionnez

Dans les cellules E3   et G3  les identifiants et mots de passe peuvent varier
selon l'utilisateur 

Private Sub Worksheet_Change(ByVal Target As Range)
     If Intersect(Target, Range("E3")) Is Nothing Then Exit Sub
If [E3] = "004635N" And [G3] = "123" Then     'E3 Identifiant  G3  mot de passe
Rows("8:100").EntireRow.Hidden = False
Else: Rows("8:100").EntireRow.Hidden = True
End If
End Sub

Pourquoi repostez vous le code ?

Dans les cellules E3 et G3 les identifiants et mots de passe peuvent varier selon l'utilisateur

Oui çà j'avais compris

Les infos utilisateurs de référence en E3 et mdp en G3 se trouvent dans quelles cellules de votre fichier ?
Il faut qu'excel sache trouver s'il ya correspondance E3 et G3

Placez un fichier ce sera plus facile de comprendre