Wie kann ich die Combobox mit einem CommandButton verknüpfen ( in Excel-VBA)?
Hallo,
ich habe in Excel-VBA eine Combobox erstellt mit mehreren Auswahlmöglichkeiten und einen Commandbutton. Ich möchte, dass sich je nachdem welche Auswahl man trifft aus der Combobox sich eine andere Userform öffnet, wenn ich den CommandButton drücke. Meine Daten aus der Combobox habe ich in einer Excel-Tabelle (H2;H9). Kann mir jemand helfen? Danke
2 Antworten
Dieser Code ist ein Beispiel, wie Du beim Click auf den CommandButton den Text der ComboBox abfragen kannst:
Private Sub CommandButton1_Click()
Select Case ComboBox1.Text
Case "Meier" FormfuerMeier.Show Case "Mueller" Formfuermueller.Show End Select End Sub
Du musst jetzt nur noch für "Meier" und "Mueller" die Werte aus Deiner Liste setzen und ggf. weitere Case-Statements für andere Werte einfügen.
Danke für die schnelle Antwort, aber es wird immer ein Synthaxfehler angezeigt :(
Private Sub CommandButton2_Click() Select Case ComboBox1.Text
Case "Valentinstag" UserForm2.Show case "Entschuldigung" userform3.Show
End Select End Sub
Hallo,
ich habe da durch die fehlenden Zeilenumbrüche wohl Verwirrung gestiftet. So muss das im Editor aussehen:
Private Sub CommandButton2_Click()
Select Case ComboBox1.Text
Case "Valentinstag"
UserForm2.Show
Case "Entschuldigung"
userform3.Show
End Select
End Sub