![]() |
Betrifft: Text für ComboBox hinterlegen
von: Andreas Hanisch
Hallo Herber Fans,
ich habe hier im Forum gestöbert, um einen ersten Eindruck vom UserForm Element der Combobox zu gewinnen. Ich habe jedoch nur ComboBoxen gefunden, die ihren Text aus einem Range bezogen haben, der auf einem normalen ExcelSheet hinterlegt war.
Ist es auch möglich die Listeneinträge.
z.B.
Test1
Test2
Test3
die in der ComboBox erscheinen sollen, direkt im VBA Code festzulegen, ohne daß ich über einen Range auf einem Arbeitsblatt gehen muß?
Vielen Dank für Eure Antworten.
Grüße, Andreas Hanisch
![]() |
Betrifft: AW: Text für ComboBox hinterlegen
von: Horst
Geschrieben am: 29.05.2008 20:32:03
Hi,
das geht mit der AddItem-Methode.
mfg Horst
![]() |
Betrifft: AW: Text für ComboBox hinterlegen
von: Peter Feustel
Private Sub UserForm_Initialize()
With ComboBox1
.AddItem "Januar"
.AddItem "Februar"
.AddItem "März"
.AddItem "April"
.AddItem "Mai"
.AddItem "Juni"
.AddItem "Juli"
.AddItem "August"
.AddItem "September"
.AddItem "Oktoberr"
.AddItem "November"
.AddItem "Dezember"
End With
If ComboBox1.ListCount > 0 Then ComboBox1.ListIndex = 0
End Sub
Gruß Peter
![]() |