Is it the activecell? If so
ActiveWorkbook.SaveAs Filename:= activecell.text


--
-John
Please rate when your question is answered to help us and others know what
is helpful.


" wrote:

Hi, I'm looking for a macro syntax that allows me to SAVE AS with
number copied from a cell reference.
(see below "PASTE HERE FROM COPY")
Thanks in advance / Magnus
..............
Application.Goto Reference:="R1C1"
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Selection.Copy
Application.CutCopyMode = False
ActiveWorkbook.Save
ActiveWorkbook.Close
ActiveWorkbook.SaveAs Filename:=PASTE HERE FROM COPY,
FileFormat:=xlNormal _
, Password:="", WriteResPassword:="",
ReadOnlyRecommended:=False, _
CreateBackup:=False
End Sub