TheProdigy
XLDnaute Impliqué
Bonjour tout le monde,
Je voudrais savoir ce qui ne va pas dans mon fichier pour l'exécution de mes Combobox 1 & 2
Merci.
Je voudrais savoir ce qui ne va pas dans mon fichier pour l'exécution de mes Combobox 1 & 2
VB:
Private Sub UserForm_Initialize()
tbl = Sheets(1).UsedRange
For i = 2 To UBound(tbl)
If tbl(i, 29) <> "" Then ComboBox2.AddItem tbl(i, 29)
If tbl(i, 27) <> "" Then ComboBox1.AddItem tbl(i, 27)
Next i
End Sub
Merci.