Bedingte ComboBoxen-Befüllung

• Bedingte ComboBoxen-Befüllung von Vliegen vom 11.04.2005 10:32:01
• AW: Bedingte ComboBoxen-Befüllung - von Boris am 11.04.2005 10:49:27
  • Im Original natürlich .Value anstatt .Text - von Boris am 11.04.2005 10:50:45
    • AW: Im Original natürlich .Value anstatt .Text - von Vliegen am 11.04.2005 12:36:27
      • AW: Im Original natürlich .Value anstatt .Text - von Vliegen am 11.04.2005 22:47:28

Betrifft: Bedingte ComboBoxen-Befüllung
von: Vliegen
Geschrieben am: 11.04.2005 10:32:01
Hallo allesamt,
Habe mit Hilfe des Forums ein Formular mit mehreren CombBoxen erstellt. Die ComboBoxen-Items werden beim Enter-Ereignis aus einer Datenbank eingelesen. Und zwar in Abhängigkeit der Auswahl in den voranstehenden ComboBoxen. Allerdings klappt das ganze bislang nur teilweise, manchmal bleibt eine ComboBox leer. Ich steige nicht recht hinter den Fehler.
Hier der Link zu einer Datei mit einem Musterformular.
Das Problem in diesem Beispiel tritt erst beim Befüllen der ComboBox5 auf weil hier gleiche Werte für alle Datensätze existieren.
https://www.herber.de/bbs/user/20962.xls
Freue mich über alle Tipps und Korrekturvorschläge.
Gruss,
Francois

Betrifft: AW: Bedingte ComboBoxen-Befüllung
von: Boris
Geschrieben am: 11.04.2005 10:49:27
Hi,
dein Beispiel kann nur funktionieren, wenn du überall die Werte aus Zeile 2 einliest - also:
Belgien - Brüssel - 1a - qwertzuiop
Dann liefert auch die Combobox5 das gewünschte "aa".
Denn in allen anderen Fällen liefert dir die If-Abfrage

If Err = 0 And _
    Cells(iRow, 1) = ComboBox1.Text And _
    Cells(iRow, 2) = ComboBox2.Text And _
    Cells(iRow, 3) = ComboBox3.Text And _
    Cells(iRow, 4) = ComboBox4.Text Then
        ComboBox5.AddItem Cells(iRow, 5)

logischerweise immer FALSE.
Grüße Boris

Betrifft: Im Original natürlich .Value anstatt .Text
von: Boris
Geschrieben am: 11.04.2005 10:50:45
Hi,
...das hatte ich nur testweise mal geändert.
Grüße Boris

Betrifft: AW: Im Original natürlich .Value anstatt .Text
von: Vliegen
Geschrieben am: 11.04.2005 12:36:27
Hallo Boris,
Oh ich Schaf !
Nur mal der Sicherheithalber.
Damit es klappt müsste ich neben iRow verschiedene Variablen deklarieren (je Spalte eine) und dann verschiedene Schleifen in einander verschachteln.
Allerdings übersteigt diese Aufgabe vermutich meine VBA-Fähigkeiten.
Falls also einer das Beispiel entsprechend verändern möchte wäre ich ihr/ihm sehr dankbar.
Gruss,
François

Betrifft: AW: Im Original natürlich .Value anstatt .Text
von: Vliegen
Geschrieben am: 11.04.2005 22:47:28
Frage noch offen

Beiträge aus den Excel-Beispielen zum Thema "Bedingte ComboBoxen-Befüllung"