Ich habe folgendes Problem:
Ich möchte den Namen der Excel-Datei
aus einer Zelle auslesen- geht das?
In z.B. Zelle A3 soll stehen "Hallo" und der Dateiname
soll dann eben Hallo.xls lauten.
Kann mir da jemand helfen?
Grüße und Danke
erriso
Sub speichern()
Dateiname = Range("A3").Value
ActiveWorkbook.SaveAs Filename:="C:\Excel\" & Dateiname & ".xls", FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
End Sub
Das setzt aber die Existenz des Pfades C:\Excel voraus.
Den Pfad könntest Du aber im o.a. Script anpassen.
Gruß,
Ptonka