Microsoft Access 例程生成的 Excel 报告出现错误 1004：方法打开对象工作簿失败

使用Microsoft Access生成Excel报告时，有时会遇到错误1004，即“方法打开对象工作簿失败”。这个错误通常出现在尝试打开一个Excel工作簿的过程中，可能是由于一些原因导致的问题。在本文中，我们将探讨这个错误的可能原因，并提供解决方案。

Sub OpenWorkbook()
    Dim wb As Workbook
    Dim filePath As String
    
    ' 指定工作簿路径和文件名
    filePath = "C:\Path\to\your\Workbook.xlsx"
    
    ' 检查工作簿是否已经打开
    On Error Resume Next
    Set wb = Workbooks(filePath)
    On Error GoTo 0
    
    ' 如果工作簿已经打开，则等待一段时间
    If wb Is Nothing Then
        Application.Wait Now + TimeValue("0:00:01")
        Set wb = Workbooks.Open(filePath)
    End If
    
    ' 打开工作簿成功，进行其他操作
    If Not wb Is Nothing Then
        ' 在这里添加你的代码，操作工作簿中的数据
    Else
        MsgBox "无法打开工作簿：" & filePath
    End If
End Sub