Combobox efüllen
21.11.2013 21:21:53
fritz
ich fülle mit folgendem Code meine Combobox
Private Sub UserForm_Initialize()
Dim lngUntersterEintrag As Long
lngUntersterEintrag = Range("A65536").End(xlUp).Row
Me.ComboBox161.List = Range("A3:A" & lngUntersterEintrag).Value
End Sub
Das funktioniert super
Wie muss ich jetzt den Code erweitern wenn ich eine zweite Combobox (162) mit den Werten aus der Spalte B befüllen will?
danke
Anzeige