Liste déroulante dans userform

Résolu
Utilisateur anonyme -  
 Utilisateur anonyme -
Bonjour

Afin d'insérer une liste déroulante dans un UserForm j'utilise la macro suivante qui est associé au ComboBox1 :

Private Sub ComboBox1_Change()
Dim i
For i = 2 To 9
ComboBox1.AddItem Sheets(2).Cells(i, 1)
Next
End Sub

Mais ça ne marche pas. Pourriez vous me dire pourquoi.

Merci d'avance

Laure
A voir également:

2 réponses

cousinhub
 
Bonjour,

Perso, j'aurai mis le code dans l'intialize de l'USF

Private Sub UserForm_Initialize()
Dim i
For i = 2 To 9
    ComboBox1.AddItem Sheets(2).Cells(i, 1)
Next
End Sub


Bonne journée
0
Utilisateur anonyme
 
Oui ça marche !
Merci
0