基于 2 个单元格的标准循环求和

【问题标题】：Loop SUM based on criteria of 2 cells基于 2 个单元格的标准循环求和
【发布时间】：2016-08-20 22:32:02
【问题描述】：

我需要一些关于 Excel VBA 的帮助。

我有 3 列数据 W、X、Y：

最终结果是将所有 X 和 Y 的值相加，并在 W 列中改变值得到类似的结果：

【问题讨论】：

这会让你开始：stackoverflow.com/questions/36821985/…

标签： excel vba

【解决方案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

【讨论】：

嗨 dzunaa - 不要忘记接受你的答案。这将在发布答案后 48 小时内实现。