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

在一個包含多個工作表的大型工作簿中，有些工作表是可見的，有些則是隱藏的。在某些情況下，您可能需要計算工作簿中所有可見工作表的總數，該如何快速進行計算呢？現在，我將為您介紹一些技巧，幫助您快速計算工作簿中可見工作表的數量。

僅使用 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. 點擊 執行 按鈕。隨後會出現一個對話框，告訴您可見工作表的數量。

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

如果您不熟悉 VBA，可以使用 Kutools for Excel 的 導航 功能來快速查看可見工作表、隱藏工作表和所有工作表的數量。

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

2. 接著，導航 窗格會出現在當前工作表的左側，點擊 工作簿與工作表 標籤進入 工作簿與工作表 區域。您可以在窗格底部查看可見工作表、隱藏工作表以及所有工作表（包括可見和隱藏）的數量。請參閱截圖：

如果您想隱藏 導航 窗格，只需點擊 Kutools > 導航 來關閉它。

Kutools for Excel 的 導航 功能非常強大，通過它，您可以查看工作表列表、儲存格名稱列表、列標題列表，還可以將區域、圖片、公式作為自動文字添加。此外，您還可以在選中的工作表中查找和替換單詞。 點擊這裡了解更多關於 導航 的信息。