Ich möchte in einem Word-Makro alle Dateien eines bestimmten Verzeichnisses
löschen. Ich stelle mir etwas in der folgenen Form vor:
1. Sub spoolloeschen()
2. With Application.FileSearch
3. .FileName = "Spool*.*"
4. .LookIn = "C:\Spool"
5. .Execute
6. For i = 1 To .FoundFiles.count
7. dateiname$ = .FoundFiles(i)
8. Documents(dateiname).Delete
9. Next i
10. End With
11. End Sub
- was wegen der Zeile 8 natürlich nicht funktionieren kann. Hat jemand
einen heissen Tip ??
VIele Grüße aus dem Münsterland,
Micha.
Ich denke, das gibt's in VBA auch noch, oder?
Gruß
Gunnar Keding Hitex GmbH
(Documentation Department) Greschbachstr. 12
E-Mail: GKe...@hitex.de D-76229 Karlsruhe
Phone: +49 721 9628-136 Germany
Fax: +49 721 9628-149 http://www.hitex.de
----------------------------------------------------------------------
Please do not use my E-Mail address for advertising!
----------------------------------------------------------------------
Michael Feist <fe...@landwirtschaftsverlag.com> schrieb im Beitrag
<01bdb579$a608b260$210a...@feist.landwirtschaftsverlag.com>...
> Hallo !!
>
> Ich möchte in einem Word-Makro alle Dateien eines bestimmten
Verzeichnisses
> löschen.
>