显示vba中的活动行移动页面

我正在做我的计算和使用VBA，但是当我运行代码，我不能看到发生了什么让我们说，在行400，直到运行结束。

我发现这个代码：

ActiveWindow.ScrollRow = Selection.Row ActiveWindow.ScrollColumn = Selection.Column 

要么

 Application. Goto ActiveCell.EntireRow,True 

但是没有帮助。 你能帮我滚动页面，并显示代码运行时的活动行吗？

Answer 1

尝试下面它会自动移动到活动单元格

 Sub test() Dim i as Long For i = 1 To 1000 Range("A" & i).Select Next End Sub 

Answer 2

你想要400行吗？

 Application.Goto Rows(400) 

如果要暂停执行，可以使用Stop或Debug.Assert False

对于我= 0到lastRow

    如果我= 400那么 
        应用程序。转到行（400）
        停止
    万一

下一个

如果你想暂停macros是一个条件是真的，那么使用Debug.Assert False 。 注意：当条件为false时，Debug.Assert会暂停代码。

对于我= 0到lastRow

     Debug.Assert我<> 400 

下一个