Textbox mit Ergebnis eines Querverweises füllen
25.08.2014 10:35:31
Mahony
ich hab ein Problem: Ich habe drei ComboBoxen. Die Auswahl in Nr.1 bedingt die Auswahlmöglichkeiten in Nr.2 (funktioniert).
Am Ende steht eine Textbox in der das Ergebniss eines Sverweis geschrieben werden soll, am besten direkt nachdem ich in ComboBox3 die Auswahl getroffen habe. Auf Knopfdruck wird dann der Wert in eine Zelle geschrieben (funktioniert).
Mein Versuch:
Private Sub ComboBox3_Change()
kundenindex = Application.VLookup(ComboBox3, Sheets("Tabelle3").Range("A32:A48"), 2, FALSCH)
pruefung = Application.VLookup(ComboBox2, Sheets("Tabelle3").Range("E4:U219"), kundenindex, _
FALSCH)
TextBox1 = pruefung
End Sub
Die Auswahl in ComboBox3 bringt über einen Sverweis die Spaltennummer in der bei dem zweiten sverweis gesucht werden soll. Anschließend wirds (leider nicht) in die textbox geschrieben.
Fehler beim zweiten Sverweis: Typen unverträglich.
Danke schonmal
Mahony