hi Mark,

Try this:

Sub testname()
thisworkbook.saveas "C:\" & Range("a1").value
End Sub

'Assume that range("a1").value isn;t empty

Rgds,
Halim

Mark Norton menuliskan:
I have a formula that concatenates a poortion of a customer's name, and the
date as my invoice names (i.e. IN-NORT081606. I want to save my invoices
with the name derived in a cell with the above formula. Or I would like to
name the saved file using a macro IN-NORT081606.XLS. How can I do this in a
macro??