Sub Macro8()
v1 = Range("a1")
v2 = Range("a2")
ActiveWorkbook.SaveAs Filename:="C:\yourfolder\" & v1 & v2 & ".xls"
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Tony. D" <Tony. wrote in message
...
I want to set up a Save As macro button to to save a file as "cell
value".xls. It should have the File Save As box appear with the follwing:

i.e. Cell A1 - MortgageNo
Cell A2 - 12345678

filename = MortgageNo12345678.xls

Can anyone help me out?