通过使用Ctrl + Pg向上键和Ctrl + Pg向下键,您可以轻松地在工作簿中的工作表之间移动。如果要使用快捷方式在两个特定的,不相邻的工作表(例如Sheet1和Sheet4)之间移动,该怎么办?在这种情况下,最好使用宏进行跳转。

如果需要,您可以定义两个可以进行跳转的宏。一个宏将跳转到Sheet1,另一个宏将跳转到Sheet4。使用宏记录器可以很容易地创建它们,并且可以为每个宏分配一个快捷键。

如果您正在寻找一个将在两个工作表之间切换的快捷方式,则可以使用这样的宏:

Sub JumpBetween1()

If ActiveSheet.Name = "Sheet1" Then         Worksheets("Sheet4").Activate     Else         Worksheets("Sheet1").Activate     End If End Sub

该宏只是检查以查看当前显示的工作表。

如果是Sheet1,则显示Sheet4。在所有其他情况下,将显示Sheet1。这很方便,但是这意味着,如果当前显示了Sheet2,则快捷方式将始终显示Sheet1。除非显示Sheet1或Sheet4,否则您可能不希望宏执行任何操作。在这种情况下,应使用此宏的变体:

Sub JumpBetween2()

If ActiveSheet.Name = "Sheet1" Then         Sheets("Sheet4").Activate     ElseIf ActiveSheet.Name = "Sheet4" Then         Sheets("Sheet1").Activate     End If End Sub

请注意,这两个宏之间的唯一区别是,后者的变体使用ElseIf来检查是否显示Sheet4。这意味着,如果显示除Sheet1或Sheet4以外的任何工作表,则该宏将不执行任何操作。

注意:

如果您想知道如何使用此页面(或_ExcelTips_网站上的任何其他页面)中描述的宏,我准备了一个特殊页面,其中包含有用的信息。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧(9669)适用于Microsoft Excel 2007、2010、2013、2016、2019和Office 365中的Excel。您可以在此处为Excel的较旧菜单界面找到此技巧的版本: