Ordner mit Dateien verschieben
24.09.2021 08:36:25
Steffen
Ich möchte von einem Pfad in einen anderen Pfad den gesamten Ordner MIT Inhalt verschieben, ich verstehe gerade nicht wieso er mir immer sagt das der Pfad nicht vorhanden ist...
Hier mein Code:
Sub verschieben()
Dim mach As Object
Set mach = CreateObject("Scripting.FileSystemObject")
mach.movefolder "C:\Users\ACT Motor 4\Desktop\" & einen_Tag_zuvor & ".xlsx", "C:\Users\ACT Motor 4\Desktop\Steffen\Abgeschlossene Tage\"
End Sub
Grüße
Steffen