Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Liste déroulante Userform

FCMLE44

XLDnaute Impliqué
Bonjour

J'ai créé un Userform dans lequel j'ai mis une liste déroulante

J'ai écris le code ci-dessous
VB:
Private Sub ComboBox1_Change()
ComboBox1.List = Worksheets("Feuil2").Range("G3:G11").Value
End Sub

Cela ne fonctionne pas.
Je ne comprends pas pourquoi.

Auriez vous une idée ?

Merci
 

Jacky67

XLDnaute Barbatruc
Bonjour à tous
C'est normal que cela ne fonctionne pas sur ''ComboBox1_Change()''
Essaye à l'initialisation de l'userform
VB:
Private Sub UserForm_Initialize()
    ComboBox1.List = Worksheets("Feuil2").Range("G3:G11").Value
End Sub
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…