Thanks Kletcho!
That was the trick that did it! But now i've encountered another problem:
The files that have to be deleted have no extension == "Mr. Vba" does
not recognize it as a "File". What can i do about that?

Regards,
Peter
"Kletcho" schreef in bericht
oups.com...
That's because .FoundFiles should be within the with statement. Right
now it falls outside and Mr. VBA gets confused. Change it to:


Next Bandiet
End If
Verwijderen:
Kill .FoundFiles(WegErmee)
End With