variabler Pfad
24.05.2019 12:18:11
Steve
ich habe mal eine Grundsätzliche Frage.
Gehen wir mal davon aus, das ich meine Excel Datei und alle entsprechende Ordner in einem einzigen Ordner liegen habe. VBA löscht, kopiert und erstellt neue Ordner, aber niemals ausserhalb des Hauptordners.
Jetzt dachte ich mir es ist doch blöd das ich diesen Hauptordner nicht verschieben oder gar an einem anderen Rechner verwenden kann. Ich habe also recherchiert, etwas gefunden und auch ausprobiert.
Hier mal ein Test bei dem nur ein Ordner in einen anderen Kopiert wird. Das funktioniert wohl auch.
Sub Kopie()
Dim filesystem As Object
Dim strPfad As String
strPfad = ThisWorkbook.Path
Set filesystem = CreateObject("Scripting.FileSystemObject")
filesystem.CopyFolder strPfad & "\in Arbeit", strPfad & "\Erledigt"
Set filesystem = Nothing
End Sub
zu meiner Frage: Muss ich hierbei etwas beachten oder kann ich das tatsächlich so verwenden. Würde gerne vermeiden das ich meine eigentliche Datei zerschiesse weil ich was nicht beachtet habe.
Vielen Dank und liebe Grüße
Steve