ssassam
XLDnaute Occasionnel
Bonjour ,
S'il vous plait , j'ai besoin de votre aide,
Je travaille sur une macro de Liste déroulante , mais ne ne souhaite pas indiquer la sélection pour la liste de choix
Et voila ma problématique :
Je veux remplacer la sélection
"Formula1:=$F$6:$F$9"
et intégré directement la liste de choix comme ça
Formula1:=("A" & "B" & "C" & "D")
Merci pour votre aide.
S'il vous plait , j'ai besoin de votre aide,
Je travaille sur une macro de Liste déroulante , mais ne ne souhaite pas indiquer la sélection pour la liste de choix
Et voila ma problématique :
Je veux remplacer la sélection
"Formula1:=$F$6:$F$9"
et intégré directement la liste de choix comme ça
Formula1:=("A" & "B" & "C" & "D")
Code:
Sub LISTE_CHOIX()
With Range("H19").Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:=("A" & "B" & "C" & "D")
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = "Test 1"
.ErrorTitle = ""
.InputMessage = "Test 2"
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
End Sub
Merci pour votre aide.