Via een macro een bestandsnaam opgeven om op te slaan

[Steeven22]

Ik wil via een macro zelf een bestandsnaam aan mijn excel file geven.

 

[Warme bakkertje]

Sub tst()
    Application.Dialogs(xlDialogSaveAs).Show
End Sub

of post anders een voorbeeldbestandje als de samenstelling uit celwaarden bestaat, want nu is het nogal een vage vraag om een correct antwoord op te geven

 

[Wigi]

ThisWorkbook.SaveAs "C:\test.xls"

 

[Steeven22]

Sub tst()
    Application.Dialogs(xlDialogSaveAs).Show
End Sub

of post anders een voorbeeldbestandje als de samenstelling uit celwaarden bestaat, want nu is het nogal een vage vraag om een correct antwoord op te geven

Sorry klopt. De bedoeling is dat ik met behulp van 3 celwaardes 1 bestandsnaam krijg.

 

[Wigi]

"C:\test.xls"

in mijn voorstel is tekst, dus kan het opgeknipt worden in meerdere stukken. Mbv cellen A1, A2 en A3op het actieve werkblad:

Bijvoorbeeld:

ThisWorkbook.SaveAs "C:\" & [A1] & "-" & [A2] & "-" & [A3] & ".xls"

Of nog talloze andere variaties op hetzelfde thema.

Wigi