Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema Userform
BildScreenshot zu Userform Userform-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema Image
BildScreenshot zu Image Image-Seite mit Beispielarbeitsmappe aufrufen

Combobox AddItem funktioniert nicht

Betrifft: Combobox AddItem funktioniert nicht von: Andy
Geschrieben am: 09.09.2004 11:33:38

Hallo!
Ich habe die folgende ComboBox. Leider funktioniert die AddItem-Methode nicht.
Woran könnte es liegen. Bei einer anderen Combobox hat dies funktioniert. (Einstellungen sind, nach aktuellem wissenstand, gleich)

Private Sub ComboBox1_Change()
With ComboBox1
    .AddItem "01, bla"
    .AddItem "02, bla"
    .AddItem "03, bla"
    .AddItem "04, bla"
    .MatchRequired = True
End With
End Sub


Danke
Andy
  


Betrifft: AW: Combobox AddItem funktioniert nicht von: Klaus-Dieter
Geschrieben am: 09.09.2004 11:53:11

Hallo Andy,

das liegt am Change-Ereignis über das du die Inhalte einfügen willst. So würde es zum Beispiel gehen:

Private Sub UserForm_Initialize()
With ComboBox1
    .AddItem "01, bla"
    .AddItem "02, bla"
    .AddItem "03, bla"
    .AddItem "04, bla"
    .MatchRequired = True
End With
End Sub


Gruß Klaus-Dieter


  


Betrifft: AW: Combobox AddItem funktioniert nicht von: Andy
Geschrieben am: 09.09.2004 12:03:04

Hallo Klaus-Dieter
meine andere Combobox funktioniert aber auch mit
Private Sub ComboBox2_Change()

Kann man deinen Code nur in einer Userform einfügen? Ich habe die Combobox in einer Tabelle.

Gruß
Andy


  


Betrifft: AW: Combobox AddItem funktioniert nicht von: Klaus-Dieter
Geschrieben am: 09.09.2004 22:53:54

Hallo Andy,

wenn du dieses Makro in das Modul des Tabellenblattes mit der ComboBox kopierst, dann geht das auch:

Private Sub Worksheet_Activate()
With ComboBox1
    .AddItem "01, bla"
    .AddItem "02, bla"
    .AddItem "03, bla"
    .AddItem "04, bla"
    .MatchRequired = True
End With
End Sub



Gruß Klaus-Dieter

Klaus-Dieter's Excel und VBA Seite


 

Beiträge aus den Excel-Beispielen zum Thema "Combobox AddItem funktioniert nicht"