HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Dateiname automatisch

Dateiname automatisch
24.03.2005 10:36:38
Thomas
Hallo Liste,
ich benötige Hilfe bei der automatischen Dateibenennung per Makro.
In meinem Tabellensystem trage ich den Bearbeitungszeitraum in zwei Zellen ein. Daraus generiere ich mit dem Makro Tabellennamen bzw. benenne Tabellen um. Das arbeitet.
Ich möchte die Datei jedoch auch per Makro unter einem generierten Namen speichern (z.B. aus den Einträgen "Mrz" und "2004" soll die Datei als "Mrz2004.xls" gespeichert werden.)
Bisher hat das Makro nur in ihm eingegebenen Dateinamen akzeptiert.
Hat jemand eine Idee?
Vielen Dank schon einmal
Thomas

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Benutzer
AW: Dateiname automatisch
24.03.2005 10:48:32
UweD
Hallo

so z.B.

Sub speichern()
Dim FName$, M$, J$
M = ActiveSheet.Range("A1") 'hier steht z.b. der Monat
J = ActiveSheet.Range("B1") 'hier steht z.b. das Jahr
FName = M & J & ".xls"
ThisWorkbook.SaveAs Filename:=FName
End Sub

Gruß UweD
AW: Dateiname automatisch
24.03.2005 12:44:53
thomas
Danke UweD, es funktioniert.
Schöne Ostertage.
Thomas

Meistgelesene Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Ihre Stimme zählt!