OVH Cloud OVH Cloud

Validation de liste

2 réponses
Avatar
Alain K
Bonjour,

J'essaie le code suivant pour cr=E9er une validation de=20
liste dans une cellule (command=E9 par un Commandbutton) :

With ActiveSheet.Range("A1").Validation
.Delete
.Add Type:=3DxlValidateList, Formula1:=3D"Red,Green,Blue"
End With

J'ai le message suivant : Erreur d'ex=E9cution 1004
O=F9 est l'erreur ?

Merci

2 réponses

Avatar
anonymousA
bonjour,

faire précéder tes instructions de range("A1").activate

A+


Bonjour,

J'essaie le code suivant pour créer une validation de
liste dans une cellule (commandé par un Commandbutton) :

With ActiveSheet.Range("A1").Validation
..Delete
..Add Type:=xlValidateList, Formula1:="Red,Green,Blue"
End With

J'ai le message suivant : Erreur d'exécution 1004
Où est l'erreur ?

Merci




Avatar
AV
Dans les propriétés du bouton mettre
TakeFocusOnClick
à False

ou utiliser un boton de la barre d'outils formulaire
AV