如何計算活頁簿中可見工作表的數量？

作者Sun修改日期2024-11-14

在包含多個工作表的大型活頁簿中，部分工作表可見，部分則被隱藏。若您需要快速計算該活頁簿中所有可見工作表的總數，該如何高效完成？以下將為您介紹幾種實用技巧，助您迅速取得可見工作表的數量。

僅使用 VBA 計算可見工作表的數量

使用 Kutools for Excel 計算可見工作表／隱藏工作表／全部工作表的數量

僅使用 VBA 計算可見工作表的數量

在 Excel 中，與逐一計算可見工作表相比，您可透過 VBA 快速取得可見工作表的數量。

1. 按下 Alt + F11 鍵，開啟 Microsoft Visual Basic for Applications 視窗，再點擊插入＞模組，即可新增一個模組。

2. 將下方的 VBA 程式碼貼到模組視窗中。

VBA：計算活頁簿中可見工作表的數量

Sub VisibleSheetsCount()
'UpdatebyKutoolsforExcel20150909
    Dim xSht As Variant
    Dim I As Long
    For Each xSht In ActiveWorkbook.Sheets
        If xSht.Visible Then I = I + 1
    Next
    MsgBox I & " sheets are visible", , "Kutools for Excel"
End Sub

3. 按一下執行按鈕，此時會出現一個對話方塊，顯示可見工作表的數量。

執行 VBA 程式碼後，顯示 Excel 中可見工作表數量的對話框截圖

使用 Kutools for Excel 計算可見工作表／隱藏工作表／全部工作表的數量

如果您不熟悉 VBA，可使用 Kutools for Excel 的導航功能，快速查看可見工作表、隱藏工作表及全部工作表的數量！

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

1. 開啟您要計算可見工作表數量的活頁簿，然後點擊 Kutools > 導覽。請參閱截圖：

功能區上 Kutools for Excel 導覽按鈕的截圖

2. 此時導航會出現在當前工作表左側，請點擊工作簿和表選項卡，即可進入工作簿和表區段。您可在窗格底部查看可見工作表、隱藏工作表，以及全部工作表（包含可見與隱藏）的數量。請參閱截圖：

顯示導覽窗格的截圖，其中包含可見工作表與隱藏工作表的細項

若要隱藏導航，只需點擊 Kutools > 導覽，即可立即關閉。

Kutools for Excel 的導航功能強大，不僅能查看工作表清單、儲存格名稱清單與欄位標題清單，還可將儲存範圍、圖片及公式新增為自動文字；更支援跨選取的工作表，快速查找並替換特定字詞。點此深入了解導航。

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

最佳 Office 生產力工具

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