Save As Macro

[Ku0100]

Hello,

I am trying to create a macro that when run, saves the file in a directory as whatever text is in a certain cell (let's say cell A1). I have searched this forum and found this solution:

------------------------------------------------------------------------------------------------------

Please Login or Register  to view this content.

-------------------------------------------------------------------

While this worked when I tested it with just a blank excel file (with "test" written in A1), whenever I try to use it on the excel workbooks I have different macros on, the file type it saves as is not recognized. The file type is literally just File.

I am unsure why this is happening. What I currently have in Cell A1 is "=CONCATENATE(A38," ","(",B38,")")." Could the fact that this is a formula and not just text be why it is not saving as an excel file?

Any help would be greatly appreciated, I am new to this forum but it seems like everyone on here is quite knowledgeable. Thanks in advance!


Moderator's Note: You have to use code tags around your codes. Thank you.

[AlphaFrog]

Try this to save as a macro enabled workbook

ThisWorkbook.SaveAs Filename:=FPath & "\" & FName & ".xlsm", FileFormat:=52

[Ku0100]

AlphaFrog, Thank you so much! That worked perfectly!