显示行号而不移动列

Question

我建立了一个12个月的花名册，其中我有365天的365天时间，每行列出了我的120名员工，一直到第120行。

我正在寻找一些VBA代码，这些代码将允许我（例如）在保持活动列显示的同时显示第120行。

我目前正在使用下面的简单代码，该代码突出显示了行，但是将列设置重置为显示列A。我正在使用切换按钮来启动宏。

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

任何提示，解决方案或建议，将不胜感激！

谢谢！

Answer 1

您应该创建这样的过程：

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

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