Excel VBA Макросы: Не срабатывает простейшая программа из примера

[str]

Прошу помощи знающих, не могу понять причину
На ютуб показана простая программка по поиску excel.

Пишу аналогично примеру:

Public Sub q()
For i = 1 To 4
        If Cells(1, 1) = "q" Then
            Debug.Print "результат" & i
        End If
Next i
     
End Sub

при этом создав массив на листе 1
sdfa   sd   
q   dd   
qwe   sd   
asq   qd   

В Immediate при запуске ничего не выводит. Будьте добры, подскажите что я делаю не так?

[Администратор]

Здесь в скобках у вас нет движения по строкам, вы всегда обращаетесь к одной и той же ячейке:
If Cells(1, 1)

Cells(1, 1)
первое число в скобках - номер строки на эксель-листе
второе число в скобках - номер столбца на эксель-листе

Вам нужно вместо "1" подставить переменную "i".

[str]

Как все просто!! Оказывается смотрел в маленьком окошке, и не замечал, что вместо 1 там i прописывают. Спасибо!