Hallo da draussen...
Wie muss folgender Code lauten, wenn ab Zeile 6 gesucht werden soll?
Set durchsuchen_Bearb_01 = .Range("A:A").Find(what:=CB_MAT01.Value, _
lookat:=xlWhole)
Greetz Gegga