Как использовать 5 переменных, которые меняются после каждой строки в VBA

Question

Как изменить автоматически значения J, K, L, M, R со строки 1 на последнюю строку в VBA? Кроме того, он необходим для публикации результатов в ячейке после каждого цикла от строки 1 до последней строки.

Довольно сложный вопрос, поэтому любая помощь очень ценится.

Sub NewCode()



    Dim lastRow As Variant
        lastRow = Cells(Rows.count, "F").End(xlUp).Row
    Dim counter As Integer
        counter = 0

    For i = 2 To lastRow
        If Cells(i, "J").Value = "EGM1" And _
            Cells(i, "K").Value = "1100" And _
            Cells(i, "L").Value <= "2.0253" And _
            Cells(i, "M").Value >= "2.0253" And _
            Cells(i, "R").Value = "S&C" Then

            counter = counter + 1

        End If
    Next i

    MsgBox "Number of Defects: " & counter


End Sub

Редактировать 1: Итак, у меня есть лист 1 на Excel, в котором есть такая информация, как ELR (J), TrackID (K), Начальный пробег (L), Конечный пробег (M), Тип рейки (R). и у меня есть другой лист Excel с теми же названиями, но с другой информацией. мне нужно использовать информацию на листе 1 (начиная со строки 2) и посмотреть, соответствуют ли какие-либо строки на листе 2 этой конкретной строке на листе 1. Затем выведите в ячейку на листе 1, сколько совпадений было, и повторите, спускаясь вниз информация на листе 1 .. Но я не могу вытащить исходную информацию с листа 1, а затем распечатать ее. Надеюсь, это поможет

Редактировать 2: я пытался использовать COUNTIFS(), но когда я пытаюсь проверить его, сказав, что ищите число больше 1 (то есть сотни), я продолжаю получать только 0.

 =COUNTIFS('Defects (OPEN)'!L:L, ">1" )