Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
712to716
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
712to716
712to716
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

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

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

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige