Herbers Excel-Forum - das Archiv
Datei unter neuem Namen speichern

|
Betrifft: Datei unter neuem Namen speichern
von: Patrick
Geschrieben am: 31.10.2003 11:11:43
Hallo,
ich als Laienprogrammierer habe wieder ein Problem:
TUBA ist eine variable Datei, die ich zuvor über Auswahlfenster geöffnet habe. Jetzt will ich diese unter neuem Namen speichern, wieder über Auswahlfenster.
Ich denke, dass die erste Zeile leider nicht passt. Ich hab die abgeleitet aus dem Code-Teil für das öffnen der Datei. Könnt ihr mir helfen?
TUBA = Application.SaveAsFilename
ActiveWorkbook.SaveAs Filename:=TUBA, FileFormat:=xlNormal _
, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
Danke & Gruß,
Patrick
Betrifft: AW: Datei unter neuem Namen speichern
von: Hajo_Zi
Geschrieben am: 31.10.2003 11:23:26
Hallo Patrick
die Zeile
TUBA = Application.SaveAsFilename
führt bei mir schon zu einemFehler, wobei mir nicht klar ist was Du damit willst.
Tuba war ja der Name vom öffnen, Du kannst die Datei nicht SaveAs unter dem gleichen Namen.
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betrifft: AW: Datei unter neuem Namen speichern
von: Patrick
Geschrieben am: 31.10.2003 11:30:48
Hi,
also, ich habe eine Datei "TUBA" geöffnet. TUBA ist variabel, das heißt ich habe sie vorher auswählen können.
Jetzt will ich diese Datei z.b. als "TUBAneu" speichern. Dabei möchte ich wieder dieses Auswahlfenster sehen, wie bei "Menü -> Speicher unter".
Ich denke, dass die Befehle einfach falsch sind. Ich bin leider nur Try&Error-Programmierer...
Gruß,
Patrick
Betrifft: AW: Datei unter neuem Namen speichern
von: Hajo_Zi
Geschrieben am: 31.10.2003 11:35:20
Hallo Patrick
benutze
Application.Dialogs(xlDialogSaveAs).Show "" ' speichern unter
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betrifft: AW: Datei unter neuem Namen speichern
von: Dirk
Geschrieben am: 31.10.2003 11:25:22
Hallo,
ich weiß zwar auch nicht, was Du genau meinst, aber wenn es das ist, was ich denke, sollte es so sein:
tuba = ActiveWorkbook.Name
Cheers