Voici le code à affecter à la liste déroulante :

 

Private Sub ComboBox1_DropButtonClick()
If ComboBox1.ListCount = 0 Then
With ComboBox1
.AddItem "texte 1"
.AddItem "texte 2"
.AddItem "texte 3"
End With
End If
End Sub

 

 

Statistiques

Aujourd'hui29
Hier2489
Cette semaine2518
Total depuis 20049477778

4
visiteurs actuellement en ligne