Office: Ordner auf Fileserver automatisch kopieren

Hallo Wissen!

In einem Excel erfasse ich jeweils neu eintretende Mitarbeitende mit den wichtigsten personenbezogenen Daten. Nach Erfassung der Person, werden eine Reihe von Makros ausgeführt und diverse Word Dokumente automatisch erstellt.
Nebst den Word Dateien wird auf dem Fileserver ein Ordner des Mitarbeitenden mit seinem Nach- und Vornamen, gestützt auf den Einträgen in der Excel Datenbank, erstellt und geöffnet. Dies passiert mit folgendem VBA Code:

Code:

' Mitarbeiterordner Anlegen auf dem Server
MkDir "I:\Personal\02 Eintritt\" & Range("H16").Value & " " & Range("I16").Value

' Mitarbeiterordner öffnen
Pfad = "I:\Personal\02 Eintritt\" & Range("H16").Text & " " & Range("I16").Text
    Shell "explorer.exe /e, " & Pfad, vbMaximizedFocus
    ThisWorkbook.Activate

Unter dem Pfad: I:\Personal\02 Eintritt
habe ich den Vorlageordner "Vorlage neue MA" in welchem diverse Unterordner liegen (insgesamt 7 Unterordner) mit zum Teil weiteren Unterordner.
Meine Frage: Wie kann ich diese 7 Unterordner in den soeben neu erstellten und geöffneten Mitarbeiterordner kopieren?

Geht das mit VBA (copy/paste von Ordnerstrukturen) oder ist es einfacher mittels MkDir die Ordner separat anzulegen..?

Ich hoffe meine Anfrage ist einigermassen verständlich und bedanke mich recht herzlich für die Unterstützung.

Grüsse
Jason

 

Hallo,
lädst Du bitte ein Beispiel hoch (Namen anonymisiert)