Moin !
Ich muss zu meiner Schande gestehen das die Funktion nicht von mir ist. Insofern kann ich die Fragen warum dies und das so und so gelöst wurde nicht beantworten
Mit dem FindClose funktioniert die Sache nun aber schon mal Fehlerfrei
Werde dann mal die Funktion etwas umschreiben .... 8)
Soweit aber erstmal vielen Dank für die Hilfe !!