Kombinationsfelder füllen

Zuerst eine UserForm erstellen, die ein Kombinationsfeld enthält.

 

 

Dann als Code für diese UserForm folgendes eingeben:

Private Sub UserForm_Initialize()

NameUserForm.NameAuswahlfeld.AddItem "Eintrag1"
NameUserForm.NameAuswahlfeld.AddItem "Eintrag2"
NameUserForm.NameAuswahlfeld.AddItem "Eintrag3"

End Sub

Hierdurch werden dem Kombinationsfeld 3 Einträge zugewiesen.

Download Muster UserForm mit fertigem Beispiel Code zum Import in VBA

 

Zurück zu den VBA Tipps