Discussion :

[drayog]

Bonjour à tous,

Pour commencer un grand merci a toute cette communauté qui m'a sauvé la vie plusieurs fois !

Bon maintenant le problème...

J'ai une plage de données (20 lignes par exemple), la colonne "A" est vide.
Chaque cellule en colonne "A" doit contenir un menu déroulant.

Le menu déroulant doit contenir 3 choix : "Moi" / "Toi" / "Eux" (exemple, exemple...)
Ces choix sont fixes et n'apparaissent nul part dans le classeur.

Je ne veux pas passer par une listebox, pas non plus par "Data validation" (car les données ne sont pas ds le classeur).

j'avais pensé à ça :

Code :

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
17
For i = 1 To Nb_L

    Range("A" & i).Select
    With Selection.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, _
            Operator:=xlBetween, Formula1:="moi", Formula2:="toi"
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = ""
        .ErrorTitle = ""
        .InputMessage = ""
        .ErrorMessage = ""
        .ShowInput = True
        .ShowError = True
    End With
Next i

Mais mauvaise pioche, le menu déroulant n'affiche que le "Moi" ...

Merci d'avance de votre aide.

[pgz]

Bonjour.

Tu modifies Formula1

Code :

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

Formula1:="moi;toi;eux"

et tu n'utilises pas Formula2.

Cordialement,

PGZ

[drayog]

bonjour pgz,

Merci de me répondre, néanmoins en mettant :

Code :

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

Formula1:="moi;toi;eux"

le menu déroulant ne me propose qu'un choix unique : "moi;toi;eux"
1 seule ligne, 1 seul choix...

[drayog]

pgz MERCI !

En mettant :

Code :

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

   Formula1:="moi , toi , eux"   ( "virgule" )

cela fonctionne parfaitement !!

Merci encore!