Office: Gefüllten Ordner löschen?

tkirsten · 20. Juli 2009

Hallo!

Ich suche ein Skript mit dem ich einen gefüllten Ordner löschen kann, folgendes klappt leider nicht:

Code:

Kill Path & "*.*"
RmDir Path
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Danke und viele Grüße
Timo

:)

Case_Germany · 22. Juli 2009

Hallo, *Smilie

probier es mal so:

Code:

Option Explicit

Public Sub Test()
Dim objFileS As Object
Dim objFileFolder As Object
Set objFileS = CreateObject("Scripting.FileSystemObject")
Set objFileFolder = objFileS.GetFolder("C:\Temp\1b")
objFileFolder.Delete
Set objFileS = Nothing
Set objFileFolder = Nothing
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Bzw. auch so:

Code:

Option Explicit

Public Sub Test()
Dim objFSO As Object
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.DeleteFolder ("C:\Temp\12")
Set objFSO = Nothing
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Aber VORSICHT! - der Code putzt den Ordner ohne Nachfrage weg.

Servus
Case

tkirsten · 22. Juli 2009

Genau so soll es sein!

Perfekt. Vielen Dank!

NoNet · 22. Juli 2009

Hallo CG,

schöner Code - gut zu gebrauchen - aber er scheitert leider bei schreibgeschützten Dateien.
Hast Du dafür auch noch eine Lösung parat ?

Danke, Gruß NoNet

chris-kaiser · 22. Juli 2009

Hallo Nonet

Code:

Option Explicit

Public Sub Test()
Dim objFSO As Object
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.DeleteFolder ("C:\Temp\12"), True
Set objFSO = Nothing
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

putzt den weg auch wenn der Ordner inklusive Dateien schreibgeschützt ist.

NoNet · 22. Juli 2009

_oT = "ohne Text"

mathieu_91 · 11. Juli 2016

Hallo, (Excel 2013)

bei mir verweigert das Makro nach dem Löschen des Ordners das Erzeugen eines neuen Ordner mit selbigem Namen.

Grund hierfür scheint der zu sein, dass der Ordner zwar nach wie vor "vorhanden" ist, aber noch nicht verschwunden ist, habe auch sonst keinen Zugriff mehr auf den Ordner.

Verschwinden tut der Ordner erst dann wenn ich Excel schließe.

Habe ich etwas wichtiges vergessen? Habe es mit allen drei Codebeispielen probiert.

Grüße

Mathieu

Office: Gefüllten Ordner löschen?

Gefüllten Ordner löschen?

Gefüllten Ordner löschen?

Gefüllten Ordner löschen?

Gefüllten Ordner löschen? - Similar Threads - Gefüllten Ordner löschen

Liste der Zeilenüberschriften gefüllter Zellen erhalten

VBA gefüllte Spalten/Zellen bis zur nächsten leeren Zählen

Makro nur ausführen wenn wenigstens eine Zelle gefüllt

VBA Editor - Hilfe benötigt - Speichern, nur wenn Felder gefüllt

CommandButton1 nur aktiv wenn Zelle gefüllt.

Listenfeld wird nicht immer gefüllt

Gefüllte Zelle erkennen und Werte von andere Spalte in gleicher Line zusammenzählen