Bonjour,
Je voudrais alimenté une combobox depuis la feuille 2 "Adresse" de la colonne C9 à G
J'ai mis ce code et sa ne marche pas ?
Si quelqu'un peut m'aider je le remercie d'avance.
Cordialement
Max
Je voudrais alimenté une combobox depuis la feuille 2 "Adresse" de la colonne C9 à G
J'ai mis ce code et sa ne marche pas ?
Si quelqu'un peut m'aider je le remercie d'avance.
Code:
Private Sub ComboBox4_Change()
If ComboBox4.ListIndex = -1 Then Exit Sub
Dim cc As Variant
cc = Sheets(2).Range("C9:G" & Sheets(2).Range("a65536").End(xlUp).Row)
For i = 1 To 5
Controls("TextBox" & i) = ComboBox4.List(ComboBox4.ListIndex, i - 1)
Next i
End Sub
Code:
Private Sub UserForm_Initialize()
' Combobox4
Dim cc As Variant
cc = Sheets(2).Range("C9:G" & Sheets(2).Range("a65536").End(xlUp).Row)
ComboBox4.List = cc
End SubCordialement
Max
Dernière édition: