如何在 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继续勾选导航窗格中的 筛选 复选框，并 在以下框中输入指定的关键字。现在，所有名称包含指定关键字的工作表都将被找到并列在下方的框中。见截图：

备注：单击搜索结果将立即跳转并打开相应的工作表。

在同一工作簿的单元格中创建指向另一张工作表的超链接