Datei endgültig gelöscht?
23.04.2009 08:24:52
Saphi
habe in der Recherche das hier gefunden:
Datei löscht sich selbst und aus dem Verzeichnis
Achtung: Sie wird auch nicht im Papierkorb abgelegt
Sub DatLösch()
Application.DisplayAlerts = False
ActiveWorkbook.ChangeFileAccess xlReadOnly
Kill ActiveWorkbook.FullName
Application.DisplayAlerts = True
ThisWorkbook.Close False
End Sub
Frage:
Ist die Datei nach ausführung des Macros tatsächlich weg oder
läßt sie sich(wie auch immer) wieder herstellen?
LG
Saphi