This worked great. Thanks much.

"Gary''s Student" wrote:

Perhaps:

Sub store_A()
Dim s As String
s = "C:\Documents and Settings\Owner\My Documents\" & Range("A1").Value &
".xls"
ActiveWorkbook.SaveAs Filename:=s
End Sub


--
Gary''s Student - gsnu200734


"el zorro" wrote:

Is it possible to create a macro to save an Excel file using the text stored
in a cell (A1 for example) as its filename. At this time cell A1 will
contain "LastName FirstName mmddyy". If possible, please help.