如何在 Excel 中依工作表名稱進行搜尋？

此方法將介紹一個 VBA 巨集，讓您輕鬆在目前工作簿中搜尋工作表。

1. 同時按下 Alt+F11 鍵，即可開啟 Microsoft Visual Basic for Applications 視窗。

2. 點選插入> 模組，並將下列 VBA 程式碼貼上至新開啟的模組視窗中。

VBA：以工作表名稱搜尋

Sub SearchSheetName()
Dim xName As String
Dim xFound As Boolean
xName = InputBox("Enter sheet name to find in workbook:", "Sheet search")
If xName = "" Then Exit Sub
On Error Resume Next
ActiveWorkbook.Sheets(xName).Select
xFound = (Err = 0)
On Error GoTo 0
If xFound Then
MsgBox "Sheet '" & xName & "' has been found and selected!"
Else
MsgBox "The sheet '" & xName & "' could not be found in this workbook!"
End If
End Sub

3. 按下 F5 鍵，或點選執行按鈕，立即執行此 VBA！

4. 在跳出「工作表搜尋」對話方塊後，請輸入您要搜尋的工作表名稱，並點選確定按鈕。請參見截圖：

接著會彈出另一個對話方塊，通知您是否已找到該工作表，直接關閉即可。

注意：此 VBA 需要工作表名稱完全相符，僅當您輸入完整的工作表名稱時，才能透過此 VBA 找到對應的工作表。

若您已安裝 Kutools for Excel，即可透過導航功能輕鬆依工作表名稱搜尋工作表。請依照下列步驟操作：

1. 預設情況下導航已開啟。若已關閉，請點選 Kutools> 導航 以顯示導航，然後點選位於導航最左側的（工作簿和工作表）。

2. 繼續勾選篩選核取方塊於導航中，並在下方框格中輸入指定關鍵字。此時所有名稱包含該關鍵字的工作表都會被找出並列於下方框格中。請參見截圖：

注意：點選搜尋結果，即可立即跳轉並開啟對應的工作表。

在同一工作簿的儲存格中建立指向其他工作表的超連結