Excel 2003 - opslaan met naam uit sheet

[panlaan]

beste mensen,

kan iemand mij op weg helpen met hoe ik kan bereiken dat een Excel file wordt opslagen:
- als naam de tekst uit een cel, de tekst in betreffende cel is afhankelijk van de gebruiker
- de path setting vast staat en NIET veranderd mag worden

Ik hoef niet een perse een kompleet uitwerkte oplossing, een idee/suggestie/richting hoe ik dit oplos is ook goed

Groet

Peter

b.v.d.

Peter

 

[Wigi]

Met SaveAs in VBA. Gebruik de zoekfunctie van het forum.

 

[robdgr]

Een suggestie:

Sub fact_opslaan()
'
' fact_opslaan Macro

'
Application.ScreenUpdating = False

    Dim MyNaam
    MyNaam = Range("d15").Value & " - " & Range("e16").Value
    ChDir "C:\Facturen"
    ActiveWorkbook.SaveAs Filename:=MyNaam & ".xls"
   
Application.ScreenUpdating = True
End Sub