Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

ComboBox befüllen

Forumthread: ComboBox befüllen

ComboBox befüllen
Mister
Hallo und guten Morgen,
ich bin dabei eine Userform zu erstellen. Beim Aufrufen dieser UF soll ComboBox1 mit den Inhalten der Spalte C befüllt werden (ohne Leerzeilen). Wenn man einen Eintrag in Combobox1 auswählt, soll ComboBox2 entsprechend mit den Eingaben in Spalte E befüllt werden (siehe Beispielmappe). Das Ganze sollte nach möglichkeit dynamisch sein da hin und wieder was dazwischen geschoben wird.
https://www.herber.de/bbs/user/67979.xls
Danke und Grüße
Martin
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: ComboBox befüllen
13.02.2010 10:02:55
Luschi
Hallo Martin,
in der Beispieldatei gibt es keine Userform!
Gruß von Luschi
aus klein-Paris
AW: ComboBox befüllen
13.02.2010 10:28:47
JOWE
Hallo Martin,
Public sh As Worksheet
Private Sub UserForm_Initialize()
Set sh = ActiveSheet
For Each v In sh.Range("C:C")
If v  "" Then
ComboBox1.AddItem v
End If
Next
End Sub
Private Sub ComboBox1_Change()
Set sh = ActiveSheet
Set c = sh.Range("C:C").Find(Me.ComboBox1.Value, LookIn:=xlValues)
r1 = c.Row
r2 = sh.Cells(c.Row, 5).End(xlDown).Row
For Each v In sh.Range(Cells(r1, 5), Cells(r2, 5))
ComboBox2.AddItem v
Next
End Sub
Private Sub CommandButton1_Click()
Unload Me
End Sub

Gruß
Jochen
Anzeige
AW: ComboBox befüllen
13.02.2010 11:09:39
Mister
Hallo Jochen,
Danke! Genau das habe ich gesucht.
@ Luschi soweit war ich noch nicht :-) Es ging in erster Linie darum ob mein Vorhaben überhaupt geht.
Einen schönen Samstag noch.
Gruß
Martin
wird da nicht alles gefüllt ?..
13.02.2010 11:16:46
robert
hi,
hab es getestet, combobox2 ist nach der auswahl combobox1
mit allen werten gefüllt.
sollte nicht vorher jedesmal die combobox2 gelöscht werden?
gruß
robert
Anzeige
AW: wird da nicht alles gefüllt ?..
13.02.2010 11:21:03
Mister
Hallo Robert,
vollkommen richtig! Ich habe das Makro mit der Zeile:
ComboBox2.Clear
ergänzt.
Gruß
Martin
OK, und sorry f.einmischen ;-) owT
13.02.2010 11:24:33
robert
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige