Automatisk filnavn VBA/Excel

Ja.

Dim Filnavn As String
Filnavn = "Ta-daa-" & CStr(Format(Now(), "dd.mm.yyyy")) & ".xls"
MsgBox Filnavn

Kigger lige med.

Det virker fint hos mig, dvs. jeg får msgboxen op, som du har beskrevet. Kan man også få den til at gemme det automatisk under det filnavn?

Dim Filnavn As String
Filnavn = "Ta-daa-" & CStr(Format(Now(), "dd.mm.yyyy")) & ".xls"
ChDir "C:\"
ActiveWorkbook.SaveAs Filename:=Filnavn

Gemmer workbook på c:\ - ret selv stien

Hvis du vil starte med et forslag og have mulighed for at ændre dette så brug denn

Dim MyFileName As String
MyFileName = Application.GetSaveAsFilename("c:\forbrug " & Format(Now, "dd-mm-yy") & ".xls")
If MyFileName <> "False" Then ActiveWorkbook.SaveAs MyFileName

Tak for hjælpen. Det er guld værd med al den viden I repræsenterer.

Det er fordi vi er så pisse kloge


Noooot

Selvfølgelig har du ret.
Klarer du også det VBA spørgsmål jeg lige har indsendt?
Hilsen