Excel自动排序然后汇总批量数据？

我希望能够采取“批量”材料清单，并有他们自动总结为“总和”类似的项目

例如，是否有一种有效的方法来完成以下任务

是否有一种有效的方式从以下方面获取：

到

我目前从第一张照片中选择所有数据，并按以下顺序进行排序：

1） 种类 2） 尺寸（W） 3） 尺寸（H） 4） 长度 5） 个人电脑

然后我选择“将任何看起来像数字的东西排序为数字”选项

但在我完成排序后，我必须手动计算“相似”项目的总数，以便完整地总结我的列表，最后得出第二张照片的样子

是否有什么东西可以自动汇总照片1中的数据，使其看起来与照片2完全相同

你的帮助会让我的生活更轻松！谢谢你抽出时间

试试这个：

它从第2行开始，根据大小（W）、大小（H）、长度和种类检查所有其他行是否匹配。如果这些都匹配，则PCS和Order相加并删除其中一行

Sub Consolidate()

    Dim i As Long

    For i = 8 To Cells(Rows.Count, 1).End(xlUp).Row
        For j = Cells(Rows.Count, 1).End(xlUp).Row To 8 Step -1
            If i <> j Then
                If Cells(i, 6).Value = Cells(j, 6).Value And _
                   Cells(i, 8).Value = Cells(j, 8).Value And _
                   Cells(i, 9).Value = Cells(j, 9).Value And _
                   Cells(i, 10).Value = Cells(j, 10).Value And _
                   Cells(i, 11).Value = Cells(j, 11).Value Then

                    Cells(i, 2).Value = Cells(i, 2).Value + Cells(j, 2).Value
                    Rows(j).Delete

                End If
            End If
        Next j
    Next i

End Sub

子合并（）
我想我会坚持多久
对于i=8到单元格（Rows.Count，1）。结束（xlUp）。行
对于j=单元格（Rows.Count，1）。结束（xlUp）。行到8步骤-1
如果我是j那么
如果单元格（i，6）.值=单元格（j，6）.值和_
单元格（i，8）。数值=单元格（j，8）。数值和_
单元格（i，9）。数值=单元格（j，9）。数值和_
单元格（i，10）。数值=单元格（j，10）。数值和_
单元格（i，11）。值=单元格（j，11）。然后计算值
单元格（i，2）。值=单元格（i，2）。值+单元格（j，2）。值
第（j）行。删除
如果结束
如果结束
下一个j
接下来我
端接头

---

那么您的标准是什么，如果物种匹配、长度匹配和大小匹配，那么您可以将它们相加？是-如果以下项目匹配：大小（W）、大小（H）、长度和物种-那么我希望列表自动将这些项目相加。这是你可以帮助我完成的事情吗？是的，我在几周前写了一个解决方案，但我从未收到你的回复：）。我可以看看明天是否还有。太好了-非常感谢-那将非常有帮助，非常感谢！早上好，德维尼-我只是想跟你跟进这件事，再次请求你的帮助。这是我很长时间以来一直试图找到解决方案的事情，所以我只想再次联系你，请你在这方面提供帮助-你会以如此巨大的方式帮助我-再次感谢你的回答-讽刺-你能直接指导我，让我知道如何解释上述公式的“意义”吗？还有，输入此公式/编码需要采取哪些步骤？是Visual Basic吗？啊，对不起，我不知道你在找公式。您需要的是一个宏-这是Visual Basic for Applications（VBA）-如果您转到“查看->宏”并命名一个宏（例如，“测试”），然后在测试宏中的

子部分
结束子部分
上单击“创建、复制并粘贴上述代码”。然后当你运行它时，它会满足你的要求。所以。我运行了测试，但我的值没有正确地相加。我还应该注意到，我需要的“总和”是B列值（PCS）。此外，除了计算大小（W）、大小（H）、长度和物种是否匹配外，我还需要宏/VBA根据与屏幕截图上不可见的附加列的匹配情况进行汇总，该列是K列，该列将是“注释”列。dwirony-有没有可能请您尝试重新编写代码？非常感谢您在这方面帮助我！！你太棒了-再次感谢你！