цикл по строкам

[Morozeckiy]

Сообщение от Aleksandr H.

Cells(i, h) <> Cells(k, j) - Cells(k, h)

Что за условие, когда надо закрашивать ячейку?

2 часа
с 12 по 14
14 -12, если не равно 2, о закрашиваем. Там единственное выдает ошибку debug mismutch, когда все ячейки пустые(то есть не работал он в этот день.) Но я решил это так

  For i = 2 To 62 Step 2
                For h = 2 To 40 Step 2
                    k = i + 1
                    j = h + 1
                   If Cells(i, h) = "" Then
                    ElseIf Cells(i, h) <> Cells(k, j) - Cells(k, h) Then
                        Cells(i, h).Interior.Color = 5263615
                    End If
                Next h
        Next i