Bonjour'.
Je suis tout jeune dans la création de code.
Dans la cellule "a5", j'ai créé une liste déroulante : validation de donnée par liste et sélection "e5:e7"
Selon le nom que j'ai sélectionné dans cette liste déroulante, j'aimerai qu'une liste déroulante apparaisse en "b5"
Tel que si je sélectionne "Fred" en "a5" apparaisse une liste déroulante en "b5" avec choix" À,B ou C".
Mais que cette liste déroulante n'apparaisse pas si je choisis "Greg" ou "Francois".
Est ce possible ?
J'ai écrit ce code, mais du coup la liste déroulante ne disparaît pas si je change et que je choisis "Greg" ou "Francois"
Primate sub worsheet_change (byval Target as range)
If Not Application.Intersect(Target, Range("A5")) Is Nothing Then
ElseIf Range("A5") = "greg" Then
Range("B5").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:=xlBetween, Formula1:="A,B,C"
End With
End If
End Sub
Merci de votre aide