VBA步入跳过循环

时间:2016-11-11 23:04:15

标签: excel vba excel-vba for-loop step-into

我开始使用这个"向导"文件自动执行一些Excel(2016)任务,我遇到了VBA(7.1)中的Step Into工具的问题。这是我的代码:

Public LastInitial As Integer

Sub FormatRecipeFile()

    'Get the row number of the last 
    'initial listed in column D:
    LastInitial = Range("D" & Rows.Count).End(xlUp).Row

    'Prints "9" in cell F5:
    Range("F5").Value = LastInitial

    'The first initial is cell D3, so set j to 3:
    For j = 3 To LastIntitial
        'Set each intial to a new value:
        Range("D" & j).Value = Range("D" & j).Value & " (done)"
    Next j

End Sub

公共变量必须公开以供将来使用。印刷" 9"在F5中我的方式是检查在For循环中是否有要循环的项目。

问题在于,当击中F8时,每行代码都会完美执行,它甚至会突出显示"对于j = 3 To LastInitial",但是当我再次点击F8时它会跳到#34 ; End Sub"没有在For循环中运行任何东西。

1 个答案:

答案 0 :(得分:1)

嗨,好像你的行中有一个拼写错误

For j = 3 To LastIntitial

应该阅读

For j = 3 To LastInitial