Hallo,
du könntest versuchen den Fehler noch etwas einzugrenzen, indem du Haltepunkte in den Code einbaust (mit stop oder F9->roter Punkt)
Mach an mehreren stellen den Haltepunkt und lass dann mit F5 den Code laufen.
So kannst du den Fehler eingrenzen.
P.S. noch was am Rande.
Wenn du Variablen deklarierst
Dim Listenwert, Suchewert As String
wird nur die letzte als String deklariert, die vorderen sind dann Variant.
Dürfte aber bei dir nicht zum Fehler führen.
|