Microsoft Excel

Herbers Excel/VBA-Archiv

Anzeige in Combobox

Betrifft: Anzeige in Combobox von: Wolfgang B.
Geschrieben am: 15.09.2004 11:29:03

Hallo,

ich habe eine Tabelle, in der verschiedene Werte stehen. Diese Werte werden in Comboboxen eingelesen mit folgenden Code.

Sub Daten_einlesen()
    'Name einlesen
    Dim arr
    Dim Ziel
    Ziel = "b" & Workbooks("AdressenDB.xls").Worksheets("DB").Cells(Rows.Count, 2).End(xlUp).Row
    arr = Workbooks("AdressenDB.xls").Worksheets("DB").Range("a2", Ziel)
    With UserForm1.ComboBox1
        .ColumnCount = 2
        .ColumnWidths = "5cm;2cm"
        .ListWidth = 250
        .List = arr
        End With
    UserForm1.ComboBox1.ListIndex = 0
    Run "Daten_abfragen"
End Sub

Sub Daten_abfragen()
    Dim z1
    z1 = UserForm1.ComboBox1.ListIndex + 2
    If UserForm1.ComboBox1.ListIndex > -1 Then
        UserForm1.ComboBox2.Text = Workbooks("AdressenDB.xls").Worksheets("DB").Cells(z1, 2).Value 'Ort
        End If
End Sub


Dieser Code funktioniert.
Wenn in den eingelesenen Spalten z.B. Namen und Vornamen sind, kann ich in Combobox1 einen Anfangsbuchstaben eingeben und Excel sucht sich sofort den ersten Namen mit diesem Anfangsbuchstaben und liefert sogleich in Combobox2 den entsprechenden Vornamen zu diesem Namen.
Jetzt kommt mein Problem:
Stehen nun in den Spalten PLZ und Ort wird in Combobox1 die PLZ angezeigt aber nach Eingabe einer Zahl liefert Excel dann nicht die erste PLZ die mir der eingegebenen Zahl beginnt und auch Combobox2 liefert nicht den dazu gehörenden Wert.
Wählt man die PLZ über die Dropdownliste aus, zeigt Combobox2 den richtigen Wert. Diese Vorgehensweise ist aber nicht gewünscht.

Ich hoffe Ihr könnt mir einen Denkanstoß geben.

MfG
Wolfgang
  


Betrifft: AW: Wo sind die Profis??? von: Wolfgang B.
Geschrieben am: 15.09.2004 12:57:48

Hat niemand eine Idee warum das nicht mit Zahlen funktioniert?
Bei einer eindimensionalen Combobox funktioniert es ja auch mit Zahlen.

Ich bin am verzweifeln.

MfG
Wolfgang


 

Beiträge aus den Excel-Beispielen zum Thema "Anzeige in Combobox"