PC,

thanks.... but.... this does not seem to work am i supposed to do something
first to make these codes work... i have tried a number of them and none seem
to work.

i am running xp with office pro 2003, i have never had a successfull outcome
using vba/vbe. i think i must be doin some thing wrong or i am not set up to
run these codes.

HELP!...lol


"PCLIVE" wrote:

I'm sure you'll need to use VBA for this. This will save the file with the
name based on the contents of A1.

Sub AutoSaveName()
ActiveWorkbook.SaveAs Range("A1").Value
End Sub


If you want to specify a save location:

Sub AutoSaveName()
ActiveWorkbook.SaveAs Filename:="C:\Temp\" & Range("A1").Value & ".xls",
FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
End Sub

HTH,
Paul

"cxlough41" wrote in message
...