Ich möchte mittels eines Makros eine Arbeitsmappe von einem Laufwerk auf ein anderes Laufwerk kopieren, ist das möglich und wenn ja, wie?
Hallo worasenior,
hier ein Beispiel zu Ihrer Frage:
Sub KopiereArbeitsmappe()
Dim quelle As String
Dim ziel As String
‚ Pfad zur Quell-Arbeitsmappe
quelle = „C:\Pfad\zur\Quell\Arbeitsmappe.xlsx“
‚ Pfad zur Ziel-Arbeitsmappe
ziel = „D:\Pfad\zum\Ziel\Arbeitsmappe.xlsx“
‚ Arbeitsmappe kopieren
FileCopy quelle, ziel
End Sub
Ersetzen Sie "C:\Pfad\zur\Quell\Arbeitsmappe.xlsx"
und "D:\Pfad\zum\Ziel\Arbeitsmappe.xlsx"
durch die tatsächlichen Pfade Ihrer Arbeitsmappen.
Zur Ausführung müssen Makros aktiviert sein.
MfG
Li