Tipps & Tricks 30.08.2004, 22:30 Uhr

Zellinhalt als Dateiname für eine Excel-Datei verwenden II

Wie kann ich einen Button in Excel machen, der mir die Datei anhand eines Zellenwertes speichert. In einer Zelle ist das aktuelle Datum vorhanden. Jetzt möchte ich einen Knopf, der die Datei automatisch mit diesem Datum als Namen speichert.
Eine Ähnliche Frage wurde bereits früher gestellt und beantwortet. Sie finden diesen Artikel unter dem Webcode 23049 [1]. Das Makro in Ihrem Fall benötigt nur eine ganz kleine Änderung, damit es auch mit dem Datum korrekt funktioniert.
Hängen beim Namen "N" noch die Dateiendung ".xls" hinten an. Die genaue Schreibweise ersehen Sie im untenstehenden Screenshot.
-------------------------------
MAKRO ZUM KOPIEREN:
-------------------------------
Sub SpeichernUnter()
Dim N, P As String
P = "C:\Eigene Dateien\"
N = Sheets(1).[B1].Value & ".xls"
ActiveWorkbook.SaveAs _
Filename:=P & N, FileFormat:=xlNormal
End Sub
-------------------------------



Kommentare
Es sind keine Kommentare vorhanden.