Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
404to408
404to408
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

2 ComboBoxen in einer UserForm füllen

Forumthread: 2 ComboBoxen in einer UserForm füllen

2 ComboBoxen in einer UserForm füllen
Dirk
Hallo Leute,
wieder mal eine kleine Aufgabe für euch.
Ich habe eine UserForm mit zwei ComboBoxen. Die eine Combobox ist mit den Monatsnamen gefüllt. Die zweite ComboBox soll mit, in Abhängigkeit der Auswahl in der ersten ComboBox, Daten aus einer Tabelle gefüllt werden.



Wähle ich also z.B. in der ersten ComboBox den Monat Februar aus, dann sollen alle Daten die in der rechten Spalte, neben dem Monat Februar stehen, in der zweiten ComboBox angezeigt werden.
Die erste ComboBox wird nicht mit den Daten aus dieser Tabelle gefüllt.
Im vorraus schon einmal Danke.
Gruß Dirk
Anzeige
AW: 2 ComboBoxen in einer UserForm füllen
Ingo 

Private Sub ComboBox1_Click()
Dim monat As String
Dim i As Integer
UserForm1.ComboBox2.Clear
monat = UserForm1.ComboBox1.Text
i = 2
Do While Sheets("Tabelle1").Cells(i, 1) <> ""
If Sheets("Tabelle1").Cells(i, 1) = monat Then
UserForm1.ComboBox2.AddItem (Sheets("Tabelle1").Cells(i, 2))
End If
i = i + 1
Loop
End Sub

mfG
Ingo Christiansen
Anzeige
AW: 2 ComboBoxen in einer UserForm füllen
30.03.2004 11:51:12
Dirk
Hallo Ingo,
danke für die schnelle Hilfe. Klappt hervorragend.
Gruß Dirk
AW: 2 ComboBoxen in einer UserForm füllen
30.03.2004 14:15:54
Fabio
Hallo,
ich möchte das gleiche machen wie Dirk unten beschrieben hat und habe deshalb den
Threat ausschnittsweise rauskopiert...
Leider funktioniert der von Ingo angegebene Code nicht bei mir!?!?
Ich habe zum Testen die Tabelle von Dirk kopiert und eben ein Userform
incl. 2 Comboboxen gemacht das auf die Tabelle angewendet wird.
Dummerweise erscheint jedoch immer eine Fehlermeldung in der Programmzeile:
Userform1.Combox1.Clear
entferne ich diese Programmzeile, erscheint der nächste Fehler in
UserForm1.ComboBox2.AddItem (Sheets("Tabelle1").Cells(i, 2))
Vielleicht kann mir ja jemand von Euch sagen was es zu beachten gilt!!!?
Grüße Fabio
_______________________________________________________________________________________
VON DIRK:
Ich habe eine UserForm mit zwei ComboBoxen. Die eine Combobox ist mit den Monatsnamen gefüllt. Die zweite ComboBox soll mit, in Abhängigkeit der Auswahl in der ersten ComboBox, Daten aus einer Tabelle gefüllt werden.
A..... B
------------
Monat Stadt
Januar Köln
Januar Dortmund
Januar Bochum
Januar Gladbach
Februar Duisburg
Februar Oberhausen
Februar München
Februar Hamburg
März Berlin
März Frankfurt
März Rostock
März Trier
April Aachen
April Leverkusen
April Bremen
April Gelsenkirchen
Wähle ich also z.B. in der ersten ComboBox den Monat Februar aus, dann sollen alle Daten die in der rechten Spalte, neben dem Monat Februar stehen, in der zweiten ComboBox angezeigt werden.
Die erste ComboBox wird nicht mit den Daten aus dieser Tabelle gefüllt.
Im vorraus schon einmal Danke.
Gruß Dirk

ANTWORT VON INGO:

Private Sub ComboBox1_Click()
Dim monat As String
Dim i As Integer
UserForm1.ComboBox2.Clear
monat = UserForm1.ComboBox1.Text
i = 2
Do While Sheets("Tabelle1").Cells(i, 1) <> ""
If Sheets("Tabelle1").Cells(i, 1) = monat Then
UserForm1.ComboBox2.AddItem (Sheets("Tabelle1").Cells(i, 2))
End If
i = i + 1
Loop
End Sub

mfG
Ingo


Anzeige
AW: 2 ComboBoxen in einer UserForm füllen
30.03.2004 13:49:57
Fabio
Hallo,
genau das gleiche habe ich auch vor...
Leider funktioniert der von Ingo angegebene Code nicht bei mir!?!?
Ich habe zum Testen die Tabelle von Dirk kopiert und eben ein Userform
incl. 2 Comboboxen gemacht das auf die Tabelle angewendet wird.
Dummerweise erscheint jedoch immer eine Fehlermeldung in der Programmzeile:
Userform1.Combox1.Clear
entferne ich diese Programmzeile, erscheint der nächste Fehler in

UserForm1.ComboBox2.AddItem (Sheets("Tabelle1").Cells(i, 2))
was ist denn bei mir falsch?
Grüße Fabio
Anzeige
AW: 2 ComboBoxen in einer UserForm füllen
Dirk
Hallo Fabio,
ich habe als Anhang meine Beispieldatei beigefügt.
Kann eigentlich nur ein Schreibfehler in irgend einer Codezeile sein.
Gruß Dirk
AW: 2 ComboBoxen in einer UserForm füllen
30.03.2004 14:33:56
Fabio
Hi Dirk,
also ich habs nochmal genau geprüft. es ist genau gleich wie das was Ingo codiert hat (bei Copy+Paste kann man ja auch wennig falsch machen ;-))
Ich poste die Problematik daher nochmal, vielleicht kommt ja noch jemand drauf.
Grüße Fabio
Anzeige
;

Forumthreads zu verwandten Themen

Alle Inhalte in Comboboxen löschen
Frank

Hallo!
Ich habe mehrere Comboboxen in ein Sheet eingebaut. Leider bleibt darin immer die letzte Auswahl stehen. In meiner Userform konnte ich mit "Claer all" alle Eingaben entfernen. gibt es einen solchen Befehl auch für die Comboboxen im Sheet?
Gruß Frank
15.08.2008 11:24:32
Thread-ID: 1002119
2 Beiträge
Comboboxen wie Autofilter
Klaus

Hallo zusammen
Ich habe eine Userform mit mehreren Comboboxen. Nun sollen in der ersten Combobox die Werte aus Tabelle1 A:A ohne Duplikate ausgelesen werden und nach einer Auswahl der Autofilter in Spalte A gesetzt werden. in der zweiten Combobox sollen dann die Werte aus Tabelle1 B:B ausge...
31.10.2008 09:39:00
Thread-ID: 1020780
2 Beiträge
Anzeige
Spez. Dropdown-Zuordnungen in Comboboxen
Lenhard

Moin Moin Excellianer!!
Alle Ausführungen habe ich auch direkt in meine Beispieldatei reingeschrieben.
Aber hier auch noch mal:
Im Dropdown der ComboBox1 sollen als Liste die Einträge der Zeile 1 von links nach rechts aus der Tabelle1 erscheinen (Kategorie A, Kategorie B, Kategorie...
09.12.2008 11:24:55
Thread-ID: 1031295
5 Beiträge
Comboboxen Spalten Anzahl
gp

Hallo Zusammen,
ist die Anzahl der Spalten von ComboBoxen begrenzt?
Für zweckdienliche Hinweise herzlichen Dank.
Gruss
Gunter
26.01.2009 11:08:00
Thread-ID: 1043791
5 Beiträge
48 Comboboxen mit einem Code formatieren?
Ann-Katrin

Hi,
ich möchte allen Comboboxen innerhalb einer UF das Stundenformat
"hh:mm" zuweisen.
Bislang habe ich die Boxen einzeln angesprochen.
Private Sub ComboBox1_Change() ComboBox1 = Format(ComboBox1, "hh:mm") End Sub
Da sich in der UF 48 Comboboxen befinden, möchte ich Frage...
08.02.2009 18:07:00
Thread-ID: 1048395
17 Beiträge
Anzeige
zwei comboboxen auslesen
Dee

Hi Ihr,
Ich habe zwei Kategorien mit ComboBoxen (Deutschland, Amerika), welche bei unregelmäßige Nummer tragen
Deutschland (ComboBox 2/6/7/10/13)
Amerika (ComboBox 5/8/9/11/12)
Beide können jeweils mit yes und no belegt sein. Ich möchte mir jetzt die einzelnen Fälle in einem Te...
22.04.2009 19:14:52
Thread-ID: 1070463
8 Beiträge
Comboboxen Kuriositäten
Volti

Hallo zusammen,
habe schwere Probleme mit den Comboboxen aus der Toolbox, die wie mir scheint, nach jedem Update immer schlimmer werden.
1. Resizingprobleme: Es kommt verstärkt vor, dass der angezeigte Inhalt im Auswahlfeld nach Verlassen der Seite (z.B. kurzzeitig anderes Programm wie...
02.06.2009 10:45:10
Thread-ID: 1078566
3 Beiträge
Comboboxen formatieren
Ludicla

Hey Profis,
wie müßte ein Code aussehen der mehrere Comboboxen formatiert?
ich hab an die 100 Stück - sicher es geht auch einzelen
ich schaff keinen einfachen Code und mach alles einzeln.
Gruss Ludicla.
04.06.2009 14:58:16
Thread-ID: 1079162
7 Beiträge
Anzeige
Comboboxen für abhängige Auswahlen?
Claudia

Liebes Forum,
ich habe eine Tabelle mit drei Spalten. Die darin enthaltenen Infos werden von Spalte 1 zu 3 immer feiner. Z.B. steht in Spalte 1 "Wilde Tiere" und "Zahme Tiere". In Spalte 2 dann die jeweils zugehörigen Einträge "Tiger" (natürlich Wilde Tiere) und "Hase" (Zahme Tiere). Und in...
19.06.2009 09:53:10
Thread-ID: 1082797
6 Beiträge
Anzeige
Auswahl bei Comboboxen
Quantum

Hallo,
da ich zu viele Daten habe, würde ich gerne mit einer zusätzlichen Combobox die Auswahl in der anderen Combobox beschränken auf Daten aus einen bestimmten Bereich.
In der ersten Spalte, ab der 4 Zelle steht die Gruppenzugehörigkeit, wenn ich in der Combobox4 die Gruppe wähle, w...
22.06.2009 09:16:16
Thread-ID: 1083369
19 Beiträge
Tabelle mit 2 Comboboxen auslesen
Chris

Hallo,
ich würde gerne einen Wert aus einer Tabelle mit Hilfe von 2 Comboboxen auslesen um ihn dann weiter zu verwenden. Vom Prinzip her, hab ich eine Box für die Zeile und eine für die Spalte. Nur hab ich keinen Plan wie ich am besten daraus die EINE Variable mache.
Mir würden ein paar...
24.06.2009 09:41:28
Thread-ID: 1083992
3 Beiträge
Gleiche Ereignisse für alle UF-Comboboxen
Martin

Hallo liebe Excel-Gemeinde,
ich verwende für alle Comboboxen und Textboxen in einer UserForm den gleichen Code für das "Enter" und das "Exit"-Ereignis:
Private Sub ComboBox36_Enter() ComboBox36.BackColor = &H80FFFF ComboBox36.BorderStyle = fmBorderStyleSingle End Sub
Privat...
02.07.2009 13:29:56
Thread-ID: 1085947
14 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige