Re: VBA: Три условия подряд или как оформить два оператора AND

null@example.com (niydiyin) — Wed, 27 Jul 2011 13:30:26 +0000

Ребята, простите, я дурак!
Поставил j=3 и все заработало!

VBA: Три условия подряд или как оформить два оператора AND

null@example.com (niydiyin) — Wed, 27 Jul 2011 13:00:47 +0000

Здравствуйте!
Вот такой скрипт:

Sub corpsecleaning()
    Dim i, j, k, t, n, m As Integer
    лист2.Activate
    m = 242
    n = 666
    For i = 2 To n
    For j = 2 To m
    If Лист2.Cells(i, j).Value = Лист2.Cells(i, j - 1).Value And Лист2.Cells(i, j) <> "#NA" And Лист2.Cells(i, j).Value = лист2.Cells(i, j - 2) Then
    k = j
    For t = k To m
    ActiveSheet.Cells(i, t) = "#NAA"
    Next
    End If
    Next j
    Next i
End Sub

Загвоздка в третьем условии в строчке, которая начинается с IF. Мне просто надо указать условие, что значения трех ячеек равны между собой.
И, пользуясь случаем, хотел бы спросить - выражения "ячейки равны" и "значения ячеек равны" это одно и то же?
Спасибо!

Серый форум — VBA: Три условия подряд или как оформить два оператора AND

Re: VBA: Три условия подряд или как оформить два оператора AND

VBA: Три условия подряд или как оформить два оператора AND