If InStr(ws, LCase(ListBox1.ListCount), LCase(Me.TextBox1.Value)) <> 0 Then
End If
Der Vergleich ergibt keinen Sinn.
- Der erste Parameter ist falsch.
- Du suchst einen alphanumerischen Ausdruck (TextBox1) innerhalb eines numerischen Ausdrucks (Anzahl der Items in ListBox1).
Ließ dir außerdem unter dem gleich folgenden Link noch mal die Details zu InStr durch und korrigiere dann die zwei genannten Problemfälle.
Hinweis: Mit dem InStr Parameter compare := vbTextCompare kannst du dir das LCase sparen.
BG
|