Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: VBA Drop-down in Userform

VBA Drop-down in Userform
20.01.2016 16:04:38
Alescha
Hallo zusammen,
leider scheitere ich gerade daran, dass ich ein Dropdown Feld abhängig von einem anderen machen möchte.
Wähle ich bei Combobox1 einen bestimmten Wert aus, dann möchte ich in ComoBox3 nur eine bestimmte Auswahl angezeigt bekommen, wähle ich einen anderen Wert, sollen wiederum andere bestimmte Werte angezeigt werden. Etwas Schwierig. Habe es so versucht, aber es will einfach nicht funktionieren...
'Auswahl des Wochentages orientiert an der Auswahl der Veranstaltung'
If ComboBox1.Value = "Die Stunde da wir nichts voneinander wussten" Then
ComboBox3.AddItem "Dienstag"
ComboBox3.AddItem "Donnerstag"
End If
If ComboBox1.Value = "Zum letzten Mal Ende einer Liebe" Then
ComboBox3.AddItem "Mittwoch"
ComboBox3.AddItem "Donnerstag"
End If
If ComboBox1.Value = "Engel in Amerika" Then
ComboBox3.AddItem "Donnerstag"
ComboBox3.AddItem "Freitag"
End If
If ComboBox1.Value = "Amerika" Then
ComboBox3.AddItem "Freitag"
ComboBox3.AddItem "Sonntag"
End If
If ComboBox1.Value = "Srebrenica" Then
ComboBox3.AddItem "Samstag"
ComboBox3.AddItem "Montag"
ComboBox3.AddItem "Mittwoch"
End If
Freue mich über jede Hilfe
Vielen Dank

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Drop-down in Userform
20.01.2016 17:53:40
Peter
Hallo Alescha,
so z. B.
Private Sub UserForm_Initialize()
With ComboBox3
Select Case ComboBox1.Value
Case "Die Stunde da wir nichts voneinander wussten"
.AddItem "Dienstag"
.AddItem "Donnerstag"
Case "Zum letzten Mal Ende einer Liebe"
.AddItem "Mittwoch"
.AddItem "Donnerstag"
Case "Engel in Amerika"
.AddItem "Donnerstag"
.AddItem "Freitag"
Case "Amerika"
.AddItem "Freitag"
.AddItem "Sonntag"
Case "Srebrenica"
.AddItem "Samstag"
.AddItem "Montag"
.AddItem "Mittwoch"
End Select
End Sub

Gruß Peter

Anzeige
AW: besser so
20.01.2016 17:56:58
Peter
Hallo Alescha,
vorher die Combobox leeren
Private Sub UserForm_Initialize()
With ComboBox3
.Clear
Select Case ComboBox1.Value
Case "Die Stunde da wir nichts voneinander wussten"
.AddItem "Dienstag"
.AddItem "Donnerstag"
Case "Zum letzten Mal Ende einer Liebe"
.AddItem "Mittwoch"
.AddItem "Donnerstag"
Case "Engel in Amerika"
.AddItem "Donnerstag"
.AddItem "Freitag"
Case "Amerika"
.AddItem "Freitag"
.AddItem "Sonntag"
Case "Srebrenica"
.AddItem "Samstag"
.AddItem "Montag"
.AddItem "Mittwoch"
End Select
End Sub

Gruß Peter

Anzeige
AW: VBA Drop-down in Userform
20.01.2016 17:59:09
Peter
Hallo Alescha,
aller guten Dinge sind 3 - natürlich mit End With
Private Sub UserForm_Initialize()
With ComboBox3
.Clear
Select Case ComboBox1.Value
Case "Die Stunde da wir nichts voneinander wussten"
.AddItem "Dienstag"
.AddItem "Donnerstag"
Case "Zum letzten Mal Ende einer Liebe"
.AddItem "Mittwoch"
.AddItem "Donnerstag"
Case "Engel in Amerika"
.AddItem "Donnerstag"
.AddItem "Freitag"
Case "Amerika"
.AddItem "Freitag"
.AddItem "Sonntag"
Case "Srebrenica"
.AddItem "Samstag"
.AddItem "Montag"
.AddItem "Mittwoch"
End Select
End With
End Sub

Gruß Peter

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

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