-2

我开始使用这个“向导”文件来自动化一些 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

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

问题是,当按下 F8 时,每一行代码都完美执行,它甚至突出显示“For j = 3 To LastInitial”,但是当我再次按下 F8 时,它跳到“End Sub”而不在 For 循环内运行任何东西.

4

1 回答 1

1

嗨,您的行中似乎有错字

For j = 3 To LastIntitial

它可能应该读

For j = 3 To LastInitial
于 2016-11-11T23:10:24.897 回答