Discussion :

[DonKnacki]

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 vba :

Sélectionner tout - Visualiser dans une fenêtre à part

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?

[DonKnacki]

Désolé, je viens de regarder la documentation et la réponse est indiquée :
https://docs.microsoft.com/fr-fr/off...validation.add

xlValidateList
Formula1 est obligatoire, Formula2 est ignoré.
Formula1 doit contenir soit une liste de valeurs séparées par des virgules, soit une référence de feuille de calcul à cette liste.

(ce n'est pas en gras dans la doc, c'est moi qui ait fait apparaitre la source du problème )

Mais l’enregistrement de macro et ce qu'on voit visuellement ne nous aide pas !