HERBERS Excel-Forum - das Archiv
Bewerten Sie hier bitte das Excel-Portal

Thema: save mit variablem Name | Herbers Excel-Forum

save mit variablem Name
meixner

Hallo zusammen,
versuche eine Arbeitsmappe abzuspeichern mit variablem Name. Ich möchte, dass die Arbeitsmappe unter dem Namen abgespeichert wird, der sich im activeworkbook im Datenblatt 1 Zelle C8 steht. Wie funktioniert das?
Viele Grüße und vielen Dank für Tips
Dani
activeWorkbook.SaveCopyAs "I:\CM_88\8801\FM\Allgemeines wie Forms_Listen_Berechnungen\CorpActions (past)\sheets(1).range("c8").xls"

AW: save mit variablem Name
Backowe

Hi Dani,
activeWorkbook.SaveCopyAs "I:\CM_88\8801\FM\Allgemeines wie Forms_Listen_Berechnungen\CorpActions (past)\" & sheets(1).range("c8") & ".xls"
Gruß Jürgen
AW: save mit variablem Name
meixner

Hi Jürgen,
das hat super funktioniert.
Vielen Dank und viele Grüße
Dani
AW: save mit variablem Name
Björn

Hallo Dani,
diesmal, versuche ich etwas "schneller" die Lösung zu bringen ;-)
Du musst dir den Dateinamen variabel zusammensetzen.
In meinem Beispiel muss in C8 auch das ".xls" stehen. 
Sub speichern()
Dim Dateiname As String
Dateiname = Sheets(1).Range("C8")
ActiveWorkbook.SaveCopyAs "I:\CM_88\8801\FM\Allgemeines wie Forms_Listen_Berechnungen\ _
CorpActions (past)\" & Dateiname
End Sub

Wenn ".xls" nicht in Zelle steht, musst Du noch & ".xls" dahinter schreiben.
Klappt das?
Gruß
Björn
AW: save mit variablem Name
meixner

Danke Björn für die Mühe, aber hab schon eine Lsg. bekommen.
Viele Grüße
Dani