Macro erroring out when I execute

[ariel20029]

Dim FName As String
Dim FPath As String

FPath = "C:\PS CREDIT"
FName = Sheets("Request Form").Range("C80").Text
ActiveWorkbook.SaveAs FileName:=FPath & "" & FName
MsgBox "File Saved to PS CREDIT folder"


Hi When I try to run this macro I am getting an error message at the ActiveWorkbook Save as file name-

saying method saveas workbook failed. Please help.
Sharon

 

[Rick Rothstein]

Dim FName As String
Dim FPath As String

FPath = "C:\PS CREDIT"
FName = Sheets("Request Form").Range("C80").Text
ActiveWorkbook.SaveAs FileName:=FPath & "\" & FName
MsgBox "File Saved to PS CREDIT folder"

Hi When I try to run this macro I am getting an error message at the ActiveWorkbook Save as file name-

Hard to know for sure what is wrong without knowing what ends up in the FName variable, but my guess is you are missing the backslash between the path and the filename. It looks like you anticipated it in your code but forgot to place it between the double quotes as shown in red above. Note the character looks like a vertical bar instead of a backslash because the backslash is distorted by the italic font used by this forum for quoted code.