Hallo,

vor kurzem habe ich hier Hilfe bekommen, die top war.

Mein Code (siehe unten) funktioniert soweit wenn ich nach der ID_Nummer des Kunden Suche.

Nun möchte ich aber auch nach dem Nachname suchen, allerdings funktioniert der Code nicht.

'Code für ID_Nummer, der Funktioniert

Dim i As Integer
 
For i = 0 To ListBox1.ListCount - 1
    If ListBox1.List(i, 0) = Search_ID.Text Then
        ListBox1.Selected(i) = True
    End If
Next


'Code für Nachname, der nicht funktioniert

Dim i As Integer
 
For i = 0 To ListBox1.ListCount - 1
    If ListBox1.List(i, 2) =Search_Nachname.Text Then
        ListBox1.Selected(i) = True
    End If
Next