Workbook.SaveCopyAs方法（Excel）返回运行时错误“1004”

这是Office 2016 Mac OS版本的问题。

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Dim FilenameStr As String FilenameStr = Sheet1.Range("F11").Value FilenameStr = ActiveWorkbook.Path & "/" & FilenameStr & "_" & Sheet1.Range("I5").Value 

或者作为上一行的替代scheme

 FilenameStr = FilenameStr & "_" & Sheet1.Range("I5").Value 

在这一点上，我得到这样的FilenameStr
/用户/名为myUsername / somedir / 123456789_20130531-002

  ActiveWorkbook.SaveCopyAs (FilenameStr & ".xls") Cancel = True End Sub 

这是我得到的错误运行时错误“1004”：无法访问只读文档123456789_20130531-002.xls

该文件不存在并且必须创build，但每个工作都在Office 2011中运行。