Liste déroulante Excel VBA
Bonjour à tous,
Je cherche à faire une liste déroulante via VBA
Mon premier réflexe est d'utiliser une macro enregistrée VBA et voici le résultat obtenu:
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
| Columns("A:A").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="A;B"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
Range("A5").Select
End Sub |
Ma liste est créée et je peux choisir entre les valeur "A" ou la valeur "B" pour chaque ligne de la colonne A
Manuellement, je retire la liste via le menu Validation des données (je met donc Autoriser Tout)
Je refais exécuter de la macro et surprise :
J'ai bien une liste mais avec une seule valeur : "A;B"
J'ai donc opté pour des listes sur une référence vers une autre feuille mais je ne sais pas comment ne pas prendre le titre de la colonne
Validation des données : =Feuil1!$A:$A
si dans la feuille "Feuil1", j'ai mis :
ListeToto
A
B
Je pourrai choisir la valeur "ListeToto"
Remarque: comme cela, la macro semble fonctionner à l'identique que l'enregistrement
Il y a t'il une solution à mon problème?
