SaveCopyAs runtime error

[rudfaden]

When i use the following code in Excel 2011 for Mac i get runtime Error 1004.

Does anyone have an idea to fix it?

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim Msg As String
Dim Ans As Integer
Dim FName As String
Msg = “Would you like to make a backup of this file?”
Ans = MsgBox(Msg, vbYesNo)
If Ans = vbYes Then
FName = "Rud's HD:Users:RudVFaden:Backup:” & ThisWorkbook.Name
ThisWorkbook.SaveCopyAs FName
End If
End Sub

 

[Tom Urtis]

Is it really the case that colons ( : ) are supposed to be there, and not the folder separation character " / " ?? If not, please clue us in as to which line is the offending code.

 

[rudfaden]

Hi.

Thanks for your fast reply. I think semicolon is the right thing to use. At least this is what i was able find on the web. It also works fine with the FileLen function.

The error i cused by the line

ThisWorkbook.SaveCopyAs FName