如何基于Excel中另一个工作表上的单元格值选择特定的工作表？

网友投稿 431 2024-01-16

如何基于Excel中另一个工作表上的单元格值选择特定的工作表？

假设您有一个包含所有工作表名称的数据验证下拉列表，并且您要根据您在下拉列表中选择的工作表名称自动选择或跳转到相应的工作表，该怎么办？在将工作表名称输入指定的单元格后，如何自动跳至某个工作表呢？本文将向您展示几种实现它的方法。

根据带有VBA代码的下拉列表选择来选择特定的工作表

使用VBA代码根据单元格值选择特定的工作表
轻松创建工作表索引并转移到特定工作表 Kutools for Excel 根据带有VBA代码的下拉列表选择来选择特定的工作表

惊人的！在 Excel 中使用高效的选项卡，如 Chrome、Firefox 和 Safari！ 每天节省50％的时间，并减少数千次鼠标单击！

例如，一个下拉列表位于sheet2的单元格A8中。在下拉列表中选择工作表名称时，可以运行下面的VBA代码来选择或跳至相应的工作表。

1。按其他 + F11 打开 Microsoft Visual Basic应用程序 窗口。

2.在 Microsoft Visual Basic应用程序 窗口中，双击左栏中的工作表名称（工作表包含您将从中选择工作表名称的下拉列表），然后将下面的VBA代码复制并粘贴到“代码”窗口中。

VBA代码：根据下拉列表选择来选择特定的工作表

Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next If Not (Application.Intersect(Range("A2"), Target) Is Nothing) Then _ ThisWorkbook.Sheets(Target.Value).Activate End Sub

Copy

备注：您可以将“ A2”更改为您自己的单元格。

3。按其他 + Q 同时关闭按键 Microsoft Visual Basic应用程序 窗口。

从现在开始，当您在Sheet8的下拉列表中选择工作表名称时，将自动选择该工作表。

使用VBA代码根据单元格值选择特定的工作表

如果要在单元格（sheet1中的单元格A1）中键入工作表名称后跳转到某个工作表，可以尝试以下VBA代码。

1。按其他 + F11 打开 Microsoft Visual Basic应用程序 窗口。

2.在 Microsoft Visual Basic应用程序 窗口，双击左栏中的工作表名称（您将在工作表名称中键入的工作表），然后将下面的VBA代码复制并粘贴到“代码”窗口中。看截图：

VBA代码：根据单元格值选择特定的工作表

Sub ActivateSheetsByValue() On Error Resume Next ThisWorkbook.Sheets(Worksheets("Sheet1").Range("A1").Value).Activate End Sub

Copy

3.返回到工作表，并在单元格A1中输入要选择的工作表名称，并激活代码窗口，然后按F5键运行代码。

如果Sheet1中的单元格A1包含工作表名称“ Sheet8”，则在运行VBA代码后，它将立即跳转到Sheet8。

轻松创建工作表索引并转移到特定工作表 Kutools for Excel

如果您只想快速选择或跳至特定工作表，则可以尝试 创建工作表名称列表 实用程序 Kutools for Excel。使用此实用程序，您可以轻松地创建工作表索引，然后通过单击工作表名称快速跳转到某个工作表。