如何在 Excel 中隱藏所有工作表，只保留指定或目前作用中的那一張？

作者Siluvia修改日期2025-09-11

當您在處理包含多個工作表的 Excel 活頁簿時，高效瀏覽與管理資料可能會變得困難。無論是分享報告、保護敏感資訊，還是單純減少工作區雜亂，您可能都希望僅保留一張特定工作表可見——通常是您正在編輯的那一張。僅顯示相關工作表不僅有助於保持活頁簿整潔、降低使用者混淆，更能讓注意力聚焦於關鍵內容。

本文介紹兩種在 Excel 中執行此任務的實用方法：無論您偏好運用 VBA 程式碼以獲得高度彈性，還是選擇 Kutools for Excel 來享受更直覺的操作體驗，都能找到最符合需求的解決方案。

使用 VBA 程式碼在 Excel 中隱藏所有工作表，僅保留指定的那一張
 使用 Kutools for Excel 隱藏所有工作表，僅保留作用中的那一張（只需點選幾下）

使用 VBA 程式碼在 Excel 中隱藏所有工作表，僅保留指定的那一張

對於熟悉基礎自動化操作的使用者來說，運用 VBA（Visual Basic for Applications）可靈活地隱藏所有工作表，僅保留您指定的那一張。此方法特別適合在專業環境中管理結構複雜的活頁簿，或打造供他人使用的範本。您能精準掌控哪一張工作表維持可見狀態，日後也能輕鬆調整巨集，快速執行批次作業。但請注意：使用 VBA 時，必須將檔案儲存為「啟用巨集的活頁簿（*.xlsm）」，且使用者需啟用巨集，才能順利執行相關程式碼。

請依照下列步驟仔細操作：

1. 在您開啟的活頁簿中，請先啟用要保留為可見的工作表，以免不慎將正在編輯的工作表一併隱藏。接著同時按下 Alt+F11，即可開啟 Microsoft Visual Basic for Applications 編輯器視窗。

2. 在 Visual Basic for Applications 視窗中，從功能表點選插入 > 模組，即可新增一個模組，讓您輸入 VBA 程式碼。請參閱截圖：

在 VBA 編輯器中插入新模組的截圖

3. 請將下列 VBA 程式碼複製並貼上至模組視窗的空白編輯區域。

已建立並貼上 VBA 程式碼之模組的截圖

VBA 程式碼：隱藏所有工作表，僅保留指定的那一張

Sub SheetHidden()
	Dim xWs As Worksheet
	Dim xName As String
	xName = Application.InputBox("Range", xTitleId, Application.ActiveSheet.Name, Type: = 2)
	For Each xWs In Application.ActiveWorkbook.Worksheets
		If xWs.Name <> xName Then
			xWs.Visible = xlSheetHidden
		End If
	Next
End Sub

4. 貼上程式碼後，請先確認您要操作的工作表已在 Excel 視窗中處於作用中狀態。接著按下 F5 以執行程式碼，或從 VBA 工具列選擇執行。系統將顯示一個對話方塊，預設情況下，您目前的工作表名稱會自動填入範圍欄位中。一般情況下，您可直接點選確定按鈕，無需任何變更；若想改用其他工作表，也可在此步驟一併調整。

執行 VBA 程式碼以隱藏其他工作表後，顯示作用中工作表名稱的對話方塊

5. 確認後，巨集將立即隱藏活頁簿中除您指定以外的所有工作表，省去大量手動操作步驟，特別適用於處理大型多工作表檔案，或在準備檔案供他人使用時，有效維持工作區的整潔與秩序。

請注意，隱藏的工作表並未被刪除——隨時都能輕鬆取消隱藏。不過，若您的活頁簿僅剩一張可見工作表，Excel 將不允許您再將其隱藏，因此務必確保至少保留一張工作表處於可見狀態。若您需要一次顯示所有工作表，請使用以下簡易 VBA 程式碼。

注意：若要取消隱藏所有先前隱藏的工作表，請按 Alt+F11 返回 VBA 編輯器，插入新模組或使用既有模組，將下方程式碼貼入程式碼視窗，再按下 F5 執行程式碼。執行後，活頁簿中所有工作表的可見性將立即恢復，方便您進一步編輯或檢閱！

VBA 程式碼：顯示隱藏的工作表

Sub SheetUnHidden()
	Dim xWs As Worksheet
	For Each xWs In Application.ActiveWorkbook.Worksheets
		xWs.Visible = True
	Next
End Sub

使用 Kutools for Excel 隱藏所有工作表，僅保留作用中的那一張（只需點選一下）

如果您偏好更快速、更友善使用者的操作方式，特別是經常需要管理多個工作表時，Kutools for Excel 提供了一個簡單高效的解決方案。此方法非常適合不想撰寫與執行程式碼的使用者，或是經常準備活頁簿供他人使用、追求高效工作流程的人士。Kutools 內建專用功能，讓您只需點選幾下滑鼠，即可立即隱藏所有未選取的工作表。

Kutools for Excel 提供超過 300 項進階功能，簡化複雜作業，提升創造力與效率。整合 AI 功能，Kutools 能精準自動化各項任務，讓資料管理輕鬆無負擔。Kutools for Excel 的詳細資訊…… 免費試用……

請依照下列簡易步驟操作：

1. 首先，在您的活頁簿中啟用（點選）要保留為可見的工作表。務必確認此步驟，因為 Kutools 執行操作後，僅會保留目前選取的工作表不被隱藏。

2. 接著，前往 Excel 功能區，點選 Kutools 選項卡，再進入顯示與隱藏，並從下拉式功能表中選取隱藏非選中表。此操作將立即隱藏您當前工作簿中除目前正在編輯的工作表外的所有工作表！

功能區 Kutools 索引標籤中「隱藏未選取的工作表」選項的截圖

此功能在與同事或客戶分享檔案、聚焦簡報重點，或防止支援資料遭意外修改時格外實用。整個過程即時完成，無需額外提示或設定。

若您日後需要還原（取消隱藏）所有先前隱藏的工作表，Kutools 同樣提供簡易的操作方式：點選 Kutools > 顯示/隱藏 > 取消隱藏所有工作表，即可立即取消隱藏活頁簿中的所有工作表！

功能區 Kutools 索引標籤中「取消隱藏所有隱藏的工作表」選項的截圖

注意事項：使用 Kutools 時，請務必在套用隱藏功能前確認已選取正確的工作表。此操作無法透過標準「復原」指令（Ctrl+Z）撤銷，但您可隨時依上述方式取消隱藏所有工作表。此外，Kutools 還提供多項批次工作表管理功能，助您在更複雜的情境中節省寶貴時間！

Kutools for Excel－透過超過 300 項必備工具全面強化 Excel，讓您的工作更快速、更輕鬆，並運用 AI 功能實現更聰明的資料處理與高效生產力！立即取得

替代方案：除了上述方法外，您也可根據工作流程需求考慮其他做法：

手動隱藏／取消隱藏：只要對任意工作表標籤按一下滑鼠右鍵，即可使用隱藏或取消隱藏選項。此方法適合隱藏少量工作表，但處理大型活頁簿時將相當耗時。
群組選取並隱藏：按住 Ctrl鍵，點選要隱藏的工作表（保留需顯示的那一張），接著在任一已選取的工作表標籤上按一下滑鼠右鍵，選擇隱藏即可。此方法比逐一隱藏更快速，但若需處理大量工作表，仍不如前述 VBA 或 Kutools 解決方案來得高效！

若您的使用環境對巨集或增益集存取受限，或處於受限制的環境中，這些替代方案將非常實用。

選擇解決方案時，請考量活頁簿規模、操作頻率，以及對自動化或簡易性的需求。務必再次確認哪些工作表仍保持可見，以免意外隱藏重要資料。

最佳 Office 生產力工具

🤖	KUTOOLS AI 助手：基於以下內容徹底革新數據分析：智慧執行｜產生程式碼｜建立自訂公式｜分析資料並產生圖表｜呼叫增強函數……
	熱門功能：尋找、醒目提示或標記重複值｜刪除空白行｜合併列或儲存格而不遺失資料｜不使用公式的四捨五入……
	高級 LOOKUP：多重條件 VLookup ｜多重數值 VLookup ｜跨多個工作表 VLookup ｜模糊查找……
	高級下拉列表：快速建立下拉式清單｜相依式下拉式清單｜多選下拉式清單……
	欄位管理員：新增指定數量的欄位｜移動欄位｜切換隱藏欄位的可見狀態｜比較範圍與欄位……
	精選功能：網格聚焦｜設計視圖｜增強編輯欄｜工作簿與工作表管理員｜資源庫（自動文字）｜日期提取｜合併工作表｜加密／解密儲存格｜依清單傳送電子郵件｜超級篩選｜特殊篩選（篩選粗體儲存格／斜體／刪除線……） ......
	頂尖 15 工具組：12 文字工具（添加文本，刪除特定字符，……）｜ 50+ 圖表類型（甘特圖，……）｜ 40+ 實用公式（基於生日計算年齡，……）｜ 19 插入工具（插入二維碼，從路徑插入圖片，……）｜ 12 轉換工具（金額轉大寫，匯率轉換，……）｜ 7 合併和拆分工具（高級合併行，分割儲存格，……）｜……以及更多