jeromeN95
XLDnaute Impliqué
Bonjour le forum,
Le fichier s'ouvre sur l'onglet "Page de garde" (le reste des feuilles sont masquer via 0-Visible)
Dans "Page de garde",
Lorsque l'on clic sur E14 "Si pas vide" = renvoyer à la page "Votre Buanderie" en B2
sur E16 "Si pas vide" = renvoyer à la page "Votre Cuisine" en B2
sur E18 "Si pas vide" = renvoyer à la page "Hébergement" en E3
sur E20 "Si pas vide" = renvoyer à la page "Adoucisseur" en E3
J'essaie mais je n'ai pas de résultats :
😎
Le fichier s'ouvre sur l'onglet "Page de garde" (le reste des feuilles sont masquer via 0-Visible)
Dans "Page de garde",
Lorsque l'on clic sur E14 "Si pas vide" = renvoyer à la page "Votre Buanderie" en B2
sur E16 "Si pas vide" = renvoyer à la page "Votre Cuisine" en B2
sur E18 "Si pas vide" = renvoyer à la page "Hébergement" en E3
sur E20 "Si pas vide" = renvoyer à la page "Adoucisseur" en E3
J'essaie mais je n'ai pas de résultats :
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$E$14" Then
If [E14].value <> "" Then
Sheets("Votre Buanderie").Visible = True
Sheets("Votre Buanderie").Select
Range("B2").Select
End If
End If
End Sub