Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Datei loeschen per VBA

0 views
Skip to first unread message

Michael Feist

unread,
Jul 22, 1998, 3:00:00 AM7/22/98
to
Hallo !!

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.


Gunnar Keding

unread,
Jul 22, 1998, 3:00:00 AM7/22/98
to
Hallo, Michael,
ich bin blutiger VBA-Anfänger, aber in WordBasic ging das einfach mit
Kill filename$
also auch sowas wie Kill "C:\XYZ\*.*"

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.
>

0 new messages