|
Hallo,
ich habe es schon lange probiert und einge Varianten, die es online gab probiert - aber ich bekomme es nicht hin...
Vielleicht weiß ja jemand mehr.
Ich möchte ein Kombinationsfeld ("Combobox1") das sich auf einer Userform ("Userform2") befinden mit Text füllen.
Allerdings steht der Text nicht in den Zellen eines Tabellenblattes sondern er soll per Makrocode eingefügt werden.
Ich weiß, daß es Lösungen gibt die mittels der Angabe des "Range" (Zellen auf TBlatt) das Kombinationsfeld füllen.
Ich muss es aber per Makrocode füllen, da der Inhalt nicht auf dem TBlatt stehen darf.
Option Explicit
Private Sub ComboBox1_Change()
UserForm2.Show
With UserForm2.ComboBox1
.AddItem "Januar"
.AddItem "Februar"
.AddItem "März"
.AddItem "April"
.AddItem "Mai"
.AddItem "Juni"
.AddItem "Juli"
.AddItem "August"
.AddItem "September"
.AddItem "Oktober"
.AddItem "November"
.AddItem "Dezember"
End With
End Sub
Was mache ich falsch?
Vielen Dank für die Hilfe im Voraus!!
Jörg
|