Loop SUM, основанный на критериях 2-х ячеек

Question

Мне нужна помощь в Excel VBA.

У меня есть 3 колонки с данными W, X, Y:

Окончательный результат просуммировать все X и Y с тем же значением и получить что-то подобное с изменением значения в W колонке:

Answer 1

Понял работать: D

Sub Sort01() 

    lRow = 2 
    Do While (Cells(lRow, 23) <> "") 

    ItemRow1 = Cells(lRow, "Y") 
    ItemRow2 = Cells(lRow + 1, "Y") 

    lengthRow1 = Cells(lRow, "X") 
    lengthRow2 = Cells(lRow + 1, "X") 

    If ((ItemRow1 = ItemRow2) And (lengthRow1 = lengthRow2)) Then 
     Cells(lRow, "W") = Cells(lRow, "W") + Cells(lRow + 1, "W") 
     Rows(lRow + 1).Delete 

    Else 
     lRow = lRow + 1 
    End If 
Loop 
End sub