Question

如何找到所有产品VBA代码

的唯一行和总和

有8行包含订单号和价值信息。如果基于A列中的字段存在重复，那么我想对F和E列中的金额求和，并为它保留1个条目/行。因此我需要相同的VBa代码

现在我无法上传图片，因为我没有获得此网站的徽章我将在上面举例说明

如果可能但我不知道如何使用它可以任何人帮助?????我非常感谢!!

Answer 1

好的，我50％了解你的疑问：）

让我们看看

到这个

   A    B   E
1| 4    ?   11
2| 5    ?   9
4| 6    ?   5

这是一种=Select sum(B:B) group by (A:A)

我仍然不知道为什么E而不是（C＆amp; D），但这是你必须要做的事情

在单元格E1类型[=SUMIF(A:A;"="&A1;B:B)]中，这将按[A：A]

对[B：B]分组进行求和

结果将是：

   A    B   E
1| 4    6   11
2| 5    9   9
3| 4    3   11
4| 6    5   5
5| 4    2   11

现在你必须删除重复。（在办公室2010年及以上，我相信有一个command for that），但如果你没有，你可以做这个步骤

   *ensure that the first row is the header row , this is needed by formulas on step 3, and for sorting

   1) make [E:E] static*
   2) Sort the table on column A:A
   3) in cell [F2] put [=A2=A1], (true if current cell equals previous cell, otherwise false)
   3) copy paste formulas on the rest of the rows [F:F] starting from the next cell down to the last cell
   3) make [F:F] static*
   4) sort the table by column [F:F]
   5) delete All rows where cell [F?] have value of [true]
   6) delete the column [F:F], not needed any more
   7) column [B:B] is no more needed either
   8) done

你将以此结束：

   before deletion:
        A   B   E   F
   1|   4   6   11  FALSE
   2|   4   3   11  TRUE
   3|   4   2   11  TRUE
   4|   5   9   9   FALSE
   5|   6   5   5   FALSE


   after deletion:
        A   B   E   F
   1|   4   6   11  FALSE
   2|   5   9   9   FALSE
   3|   6   5   5   FALSE

让细胞静止吗？

复制单元格然后将其值粘贴在其上，自行覆盖其公式，这样当您删除行或排序列时，值不会改变

如何找到所有产品VBA代码的唯一行和总和

1 个答案: