Hi,

I have a macro that rearranges the info in a file the way I want it. I
would to be able to save the updated file automatically using a static
beginning then adding a name part from within the worksheet. I don't want to
"SaveAs"; I want to overwrite the original file

For example: I want the file named "Account changes for 0XXX" where XXX
would be Left(C2, 3)

Any help is appreciated

Can you get this to work?

Sub Macro1()
Dim SaveHere As Variant
SaveHere = Range("B2")
ActiveWorkbook.SaveAs Filename:= _
"C:\SaveHere.xls", FileFormat:=xlExcel8
End Sub


Regards,
Ryan---
--
RyGuy


"Matt G" wrote:

Hi,

I have a macro that rearranges the info in a file the way I want it. I
would to be able to save the updated file automatically using a static
beginning then adding a name part from within the worksheet. I don't want to
"SaveAs"; I want to overwrite the original file

For example: I want the file named "Account changes for 0XXX" where XXX
would be Left(C2, 3)

Any help is appreciated

Hi Matt

Greetings. Please try the below code

Application.DisplayAlerts = False
ActiveWorkbook.SaveAs "c:\Account changes for 0" & Left(Range("C2"), 3)
Application.DisplayAlerts = True

Cheers!!

"Matt G" wrote:

Hi,

I have a macro that rearranges the info in a file the way I want it. I
would to be able to save the updated file automatically using a static
beginning then adding a name part from within the worksheet. I don't want to
"SaveAs"; I want to overwrite the original file

For example: I want the file named "Account changes for 0XXX" where XXX
would be Left(C2, 3)

Any help is appreciated