Compile Error: Expected end of statement

[daniel22bg]

Hi everyone, I am trying to set up a VBA macros. I have:

Dim Path, FileName As String
Dim  i As Integer
.....
 
'i goes in a For ... Next Loop
 
Path = Worksheets("Sheet1").Range("F23").Value
 
File_Name =Path& "POBTR2_Portfolio_" & i

        ActiveWorkbook.SaveAs FileName:=File_Name, FileFormat:=xlText, CreateBackup:=False

However, I get an error msg at

File_Name =Path& "POBTR2_Portfolio_" & i

What is it that i do wrong?

 

[JackDanIce]

I think it's because you're not defining what file type it should save as. Try changing the code to:

File_Name =Path& "POBTR2_Portfolio_" & i & ".xls"

 

[RoryA]

You need a space before the ampersand:

File_Name = Path & "POBTR2_Portfolio_" & i

 

[daniel22bg]

Thanks guys! @Rorya, it was indeed the space before the ampersand!