如何在 Excel 中切換隱藏和可見的工作表？

假設您有一些包含重要數據的工作表，不希望其他人看到，隱藏工作表可以是保護 Excel 中數據的簡單方法。但有時，您需要顯示隱藏的工作表，然後再次將其隱藏。通常情況下，您需要逐一取消隱藏它們，如果您經常進行此操作，將會非常麻煩且耗時。本文中，我將向您介紹一些快速切換工作表隱藏與顯示的方法。

使用 VBA 程式碼切換工作表的隱藏與顯示狀態

使用 Kutools for Excel 切換工作表的隱藏與顯示狀態

使用 VBA 程式碼切換工作表的隱藏與顯示狀態

假設您有一個工作簿，其中 Sheet1、Sheet2 和 Sheet3 是隱藏的，以下 VBA 程式碼可以幫助您快速顯示它們，第二次點擊則會再次隱藏它們。請按照以下步驟操作：

1. 點擊 開發工具 > Visual Basic，將彈出一個新的 Microsoft Visual Basic for Applications 視窗，點擊 插入 > 模組，然後在模組中輸入以下程式碼。

Sub ToggleHideUnhideDataSheets()
Application.ScreenUpdating = False
Dim wb As Workbook
Dim ShtNames() As Variant
Set wb = ActiveWorkbook
ShtNames = Array("Sheet1", "Sheet2", "Sheet3")
For i = 0 To UBound(ShtNames)
wb.Sheets(ShtNames(i)).Visible = Not wb.Sheets(ShtNames(i)).Visible
Next i
Application.ScreenUpdating = True
End Sub

在上述程式碼中， ShtNames = Array("Sheet1", "Sheet2", "Sheet3") 是一個變數，您可以根據需要更改隱藏工作表的名稱。

2. 然後按 F5 鍵執行程式碼，隱藏的工作表就會顯示出來；如果想再次隱藏它們，請再按一次 F5 鍵。

使用 Kutools for Excel 切換工作表的隱藏與顯示狀態

借助 Kutools for Excel 的 切換工作表的可見性 功能，您可以輕鬆地通過點擊 工作表 命令來切換工作表的隱藏與顯示狀態。

Kutools for Excel 包含超過 300 種實用的 Excel 工具。免費試用 30 天無限制。立即獲取。

當您安裝了 Kutools for Excel 後，可以按照以下步驟操作：

1. 打開包含一些隱藏工作表的工作簿。

2. 點擊 Kutools > 檢視 > 切換工作表的可見性，參見截圖：

當您點擊此命令一次時，所有隱藏的工作表都會顯示出來；如果想再次隱藏它們，請再次點擊此命令。參見截圖：

注意：此功能也適用於非連續隱藏的工作表。

相關文章：

在 Excel 中切換隱藏和可見的列