Save File with multiple cells values as it's name
One way:
Sub SaveFileAsF4AndF3()
ActiveWorkbook.SaveAs Filename:= _
Range("F4").Value & Format(Range("F3").Value, "_mm-dd-yy")
End Sub
Your example's date was ambiguous, so you may need to use
"_dd-mm-yy"
instead.
In article
,
"Kevin" ! wrote:
Is there a way to make a SaveAs macro that saves with a name this is based
in two cells. The example below only can save with the value of cell A1,
what i like to do is save the document with the name of the cell in F4 and
F3. If F4 has a name and F3 has a date then the file saved should look like
"JDoe_12-01-03".
Sub SaveFileAsA1()
ThisFile = Format(Range("A1").Value)
ActiveWorkbook.SaveAs FileName:=ThisFile
End Sub
Thanks you for you help
|