如何在Excel中打開已關閉的工作簿？

如果您不滿意通過雙擊打開包含的文件夾來打開封閉的工作簿，則可以嘗試本文中提供的快速方法。 使用以下VBA腳本，您只需運行代碼即可輕鬆打開已關閉的工作簿。

用VBA代碼打開一個封閉的工作簿

---

用VBA代碼打開一個封閉的工作簿

您可以運行下面的VBA代碼在Excel中打開一個關閉的工作簿。 請執行以下操作。

1。 按 其他 + F11 同時打開 Microsoft Visual Basic for Applications 窗口。

2。 在裡面 Microsoft Visual Basic for Applications 窗口中，單擊 插入 > 模塊。 然後將下面的VBA代碼複製並粘貼到“模塊”窗口中。

VBA代碼：在Excel中打開一個關閉的工作簿

Sub OpenClosedWorkbook()
    Dim xWb As Workbook
    Dim wbName As String
    On Error Resume Next
    Set xWb = Workbooks.Open("F:\new\add.xlsx")
    wbName = xWb.Name
    If Err.Number <> 0 Then
        MsgBox "This workbook does not exist", vbInformation, "Kutools for Excel"
        Err.Clear
    Else
        MsgBox "The workbook is opened", vbInformation, "Kutools for Excel"
    End If
End Sub

備註：在代碼中，F：\ new \ add.xlsx是您需要打開的已關閉工作簿的路徑和文件名。 請根據您的需要進行更改。

3。 按 F5 鍵以運行代碼以打開指定的已關閉工作簿。

筆記: