PDA

Vollständige Version anzeigen : Listbox wird nicht gefüllt


s8884martin
08.12.2017, 08:50
Liebe Kollegen,

hat jemand eine Idee, warum die Listbox nicht gefüllt wird?

Anbei der Code:

Private Sub UserForm2_Initialize()
With ComboBox1
.AddItem "A"
.AddItem "B"
.AddItem "C"
.AddItem "D"
.AddItem "E"
End With
End Sub

Private Sub btnOK_Click()
lstNum = ComboBox1.ListIndex
Unload Me
End Sub

Sub Vorlagen()
UserForm2_Initialize
UserForm2.Show

End Sub