如何在Excel工作簿中锁定工作表位置以始终保持可见？

如果工作簿中有多个工作表，当您导航到最后一个工作表时，第一个工作表会在工作表标签栏中隐藏，如下所示。现在您想锁定主工作表的位置以使其始终保持可见，该如何处理呢？

使用VBA锁定工作表位置

使用VBA锁定工作表位置

在这里，我将向您介绍两个用于处理此任务的VBA代码。

使用快捷方式跳转到特定工作表

1. 按 Alt + F11 键启用 Microsoft Visual Basic for Windows。

2. 单击 插入 > 模块，然后复制并将以下代码粘贴到脚本中。

VBA：跳转到主工作表

Sub GoToSheet()
'UpdatebyExtendoffice20180427
    Sheets("Master").Activate
End Sub

备注：在代码片段 Sheets("Master").Activate 中，您可以根据需要将 Master 更改为任何工作表名称。

3. 然后保存此代码，并返回到工作簿，单击 开发工具 > 宏.

4. 在 宏 对话框中，选择刚刚插入的代码名称，单击 选项，为运行此代码创建一个快捷方式。

5. 单击 确定 并关闭宏对话框。

从现在开始，当按下您创建的快捷键时，无论当前使用哪个工作表，主工作表都会被激活。

始终将特定工作表保持在最前面

1. 按 Alt + F11 键启用 Microsoft Visual Basic for Windows。

2. 双击 Project-VBAProject 窗格中的 ThisWorkbook，并复制并将以下代码粘贴到脚本中。

VBA：始终将工作表保持在最前面

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
'UpdatebyExtendoffice2018027
    Dim xSheet As Worksheet
    Application.EnableEvents = False
    Set xSheet = Sheets("master")
    If Sh.Name <> xSheet.Name Then
        Sh.Move , xSheet
        xSheet.Activate
        Sh.Activate
    End If
    Application.EnableEvents = True
End Sub

3. 保存代码并关闭VBA窗口。从现在开始，无论您选择哪个工作表，主工作表将始终保留在标签栏的最前面。

备注：在上述代码中，“master”是您希望保持可见的工作表名称，请根据需要进行更改。