ich habe folgendes Problem:
Ein Makro soll ein Datenblatt abspeichern !
Als Namen Soll der Zellinhalt von
A4=Text &"B4"=Datum
z.b. Liste_von_27/08/04.xls
Für Eure Hilfe wäre ich euch dankbar !!!!!!
mfg : Bernd :-)
Sub speichern()
Const PFAD As String = "c:\eigene dateien\"
Const EXT As String = ".xls"
Dim a As String, b As String, Dateiname As String
a = [a1].Text
b = Format([a2], "dd_mm_yyyy")
Dateiname = PFAD & a & b & EXT
ThisWorkbook.SaveAs Dateiname
End Sub