显示行号而不移动列

Display row number without moving column

我建立了一个 12 个月的花名册,其中 365 天横跨 365 列,每行列出了我的 120 名员工,一直到第 120 行。

我正在寻找一些 VBA 代码,这些代码可以让我(例如)显示第 120 行,同时保持显示活动列。

我目前正在使用下面的简单代码,它确实突出显示了该行,但重置了列集以显示列 A。我正在使用切换按钮来启动宏。

Sub ToggleButton3_Click()
Cells(ActiveCell.Row, "70").Activate
End Sub

如有任何提示、解决方案或建议,我们将不胜感激!

谢谢!

你应该像这样创建一个过程:

Public Sub MoveToRow()
    ActiveSheet.Cells(70, ActiveCell.Column).Activate
End Sub

并将其关联到键盘快捷键(即 CTRL + J)。打开宏对话框 -> Select ThisWorkBook.MoveToRow() -> 单击“选项”按钮 -> 分配快捷方式。它有效:)