So,
ich denke, das es jetzt so ist, wie du es haben willst.
Zunächst einmal die Anleitung, wie du Makro's in Office 2003 erstellst:
[
Link nur für registrierte Mitglieder sichtbar. Bitte einloggen oder neu registrieren ]
So, dann hier der Code:
PHP-Code:
Sub xy()
Const LW = "F:\"
Const Pfad = "C:\"
ChDrive LW
ChDir Pfad
ActiveWorkbook.SaveAs Filename:="C:\Test.xlsm"
ActiveWorkbook.SaveAs Filename:= _
"F:\test" & Date & ".xlsm"
End Sub
Const LW = "F:\"
ActiveWorkbook.SaveAs Filename:= _
"F:\test_" & Date & ".xlsm"
Hier musst du das F für dein Laufwerksbuchstaben und test für dein Dateinamen ändern.
ActiveWorkbook.SaveAs Filename:="C:\Test.xlsm"
Und hier speichert er die Datei unter C: ab- Den Pfad kannst du ja noch ändern.
Dann gehst du entweder jedes MAl über die Menüleiste auf Extra/Makros, oder du vergibst bereits beim Erstellen eine Tastenkombination. So führst du dann die Aktion direkt aus.
Erstelle dir mal erst eine Test Excel und probiere es aus.
Einzige was zum Problem werden könnte, wenn der UsB Stick nen anderen LW- Buchstaben bekommt.
Mfg