VBA Step To Skipping For Loop

Question

Я начал работу над этим «мастером», чтобы автоматизировать некоторые задачи Excel (2016), и у меня возникла проблема с инструментом Step Into в VBA (7.1). Вот мой код:

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 Loop.

Проблема заключается в том, что при попадании F8 каждая строка кода выполняется отлично, и она даже выделяет «For j = 3 To LastInitial», но когда я снова нахожу F8, она переходит в «End Sub», не запуская ничего внутри цикла For Loop.

Answer 1

Привет кажется, что у вас есть опечатка в строке

For j = 3 To LastIntitial 

Это, вероятно, следует читать

For j = 3 To LastInitial