Thema Datum  Von Nutzer Rating
Antwort
22.02.2021 15:37:33 Grätchen
NotSolved
Blau Userform Combobox Listeneinträge unter Bedingungen
 22.02.2021 19:18:32 Gast41192
NotSolved

Ansicht des Beitrags:
Von:
Gast41192		 Datum:
22.02.2021 19:18:32		 Views:
625		 Rating:
     
Antwort:
  Ja
Thema:
Userform Combobox Listeneinträge unter Bedingungen

ungefähr so:

Option Explicit

Private Sub ComboBox1_Change()
  If ComboBox1.ListIndex = -1 Then Exit Sub
  Select Case ComboBox1.ListIndex
    Case 0 '"Eintrag A"
      ComboBox2.List = Array("Wurst", "Käse", "Brot")
    Case 1 '"Eintrag B"
      ComboBox2.List = Array("Audi", "Mercedes", "BMW")
    Case Else
      ComboBox2.Clear
  End Select
End Sub

Private Sub UserForm_Initialize()
  ComboBox1.List = Array("Eintrag A", "Eintrag B", "Eintrag C")
End Sub

Anstatt ComboBox1.ListIndex geht auch ComboBox1.Text, dann mit dem entsprechenden Text (z.B. "Eintrag A").

 

Grüße

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
22.02.2021 15:37:33 Grätchen
NotSolved
Blau Userform Combobox Listeneinträge unter Bedingungen
 22.02.2021 19:18:32 Gast41192
NotSolved