Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
712to716
712to716
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Ordner löschen

Forumthread: Ordner löschen

Ordner löschen
28.12.2005 12:59:37
lexika
Hi,
kann mir vielleicht jemand sagen was man tun muß um einen Ordner mit Inhalt bei beendigung einer Exceldatei zu löschen?
Danke
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ordner löschen
28.12.2005 13:16:19
Unbekannter
So.
Kill ("c:\test\test.txt") 'Für Dateien
RmDir ("c:\test") 'Für Ordner
Gruß UN1
AW: Ordner löschen
28.12.2005 13:19:34
Josef
Hallo Lexika!
Achtung! Der Ordner ist entgültig weg!
Sub OrdnerLoeschen()
Dim objFSO As Object

Set objFSO = CreateObject("Scripting.FileSystemObject")

objFSO.deletefolder "F:\Temp\"

Set objFSO = Nothing

End Sub


'******************************
'* Gruß Sepp
'*
'* Rückmeldung wäre nett!
'******************************

Anzeige
AW: Ordner löschen
28.12.2005 13:41:44
Daniel
Damit Dein Ordner beim Schliessen der aktuellen Arbeitsmappe automatisch gelöscht wird musst Du in das Modul "Diese Arbeitsmappe" folgenden Code eingeben:

Private Sub Workbook_Beforeclose(Cancel As Boolean)
Kill ("c:\test\*.*")
RmDir ("c:\test")
End Sub

Beim Schliessen der Mappe werden zunächst alle Dateien im Ordner c:\test und anschliessend der Ordner selbst gelöscht.
Gruss Daniel
Anzeige
Danke
28.12.2005 13:55:20
lexika
Hi,
vielen Dank
wünsch Euch nen guten Rutsch ins neue Jahr
Gruß
lexika
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige