运行时错误'1004'：无法访问文件'C：\ WINDOWS \ System32'

Question

我从客户端收到了此错误报告，并且打印的分辨率很低。 我无法直接访问使用excel文件的人员来询问更多详细信息。

我相信错误消息会说：

  

运行时错误'1004'

     

Microsoft Excel无法访问文件'C：\ WINDOWS \ System32'。那里   有几种可能的原因：

     

  
• 文件名或路径不存在。
  
• 该文件正在被另一个程序使用。
  
• 您要保存的工作簿与当前打开的工作簿具有相同的名称。
  

也许System32之后有一个文件名，但是我不能确定。 导致错误的行如下所示：

Public Sub SaveButton()
    Dim file As String
    Dim answer As Integer
    Dim message As String
    Dim isXLSM As Boolean
    isXLSM = (ActiveWorkbook.FileFormat = xlOpenXMLWorkbookMacroEnabled)

    If isXLSM Then
        message = "Are you really done? If you confirm, this file will be saved without macros and it won't be possible to edit it further."
    Else
        message = "Are you really done?"
    End If
    answer = MsgBox(message, vbYesNo + vbQuestion, "Send to AskHR")


    If answer = vbYes Then
        If isXLSM Then
            Call OnClose
            file = SaveXlsx()
        Else
            ActiveWorkbook.Save 'Here is where the error ocurred
            file = ActiveWorkbook.FullName
        End If
        Call CreateEmail(file)
    End If

End Sub

我的假设是，也许他正在用zip文件打开文件，但我尝试了此操作，但无法重现该错误。我不是在操纵文件名，只是将其返回并用于附加到Outlook电子邮件中。

文件如何以该路径结尾？造成此错误的原因是什么？

---

编辑：可能是从只读目录打开了文件，这可能导致了错误。

Answer 1

他们正在使用Small Business Server2011。他们需要更新系统以与ActiveWorkbook完全兼容。