Bonjours le forum,
J'essai de remplir 16 combobox (combobox17 à 32) avec les mêmes plages de données mais les combobox demeurent vides ?
Où se trouve mon erreur ?
Private Sub UserForm_Initialize()
For i = 17 To 32
Controls("Combobox" & i).AddItem
For j = 1 To 7
Controls("Combobox" & j).AddItem Sheets(j).Range("f1")
Next j
Next i
End Sub
Merci
J'essai de remplir 16 combobox (combobox17 à 32) avec les mêmes plages de données mais les combobox demeurent vides ?
Où se trouve mon erreur ?
Private Sub UserForm_Initialize()
For i = 17 To 32
Controls("Combobox" & i).AddItem
For j = 1 To 7
Controls("Combobox" & j).AddItem Sheets(j).Range("f1")
Next j
Next i
End Sub
Merci