Excel VBA

[FranzK]

Zitat von Ger_17

@FranzK
Thx ... verstehe zwar nicht alle optimierungen, aber das ist ja nicht so tragisch hauptsache der code funktioniert.

habe ihn für mich angepasst und funzt super.

Dir ist aber schon bewusst, dass die Abfrage If sPfad ="" völlig sinnlos ist, da sPfad ja immer zumindest ein Leerzeichen beinhaltet? Dein Ursprünglicher Code sucht bis zu 1000 Mal sinnlos nach einem Verzeichnis und lebt nur von der Toleranz von Windows, dass es sich nicht daran stört, wenn am Ende eines Verzeichnisnamens noch ein insignifikantes Leerzeichen steht...