如果sum = 0,则为每个ID创建宏以删除行#

时间:2016-06-23 17:04:36

标签: excel vba

我需要帮助创建一个宏,当B列中每个标识号的B列数量总和等于零时,可以删除数据行。我过去使用了数据透视表和小计,但是成千上万的行,它仍然是一个时间吮吸。

例如:

 1 1001    6 
 2 1001   -1
 3 1002   15
 4 1002  -13
 5 1001   -5

我希望它删除ID为#1001的行,因为它们会清零,但完全保留ID#1002的行。

谢谢!我很感激能得到的所有帮助。

1 个答案:

答案 0 :(得分:0)

我认为最简单的方法是添加一个额外的“帮助”列。例如,假设您的数据位于范围A1:B1000中,您可以将以下公式放入单元格C1中:

C1: =SUMIF($A$1:$A$1000,A1,$B$1:$B$1000)

将所有1000行向下拖动。然后只需在C列中过滤0并删除这些行。最后,您当然也可以删除C列和中提琴。

希望有所帮助!