使用自动过滤器与公式标准

时间:2015-01-15 16:06:09

标签: excel vba excel-vba

实际上我有一个问题,我怎么能通过VBA使用EXCEL的AUTOFILTER但是使用公式。

让我解释一下:例如,见下表:

ID|EMPLOYE|SALARY
-----------------
1   ALLAN  3000
4   BOB    2500
2   MAX    800
3   TIM    200 
6   TOM    0

所以我想要的是通过计算每个工资的百分比之和来过滤这个表,并停在80%

工资是"总计= 6500"

3000 - > 46%
2500 - > 38%

46%+ 38%= 84%> 80%

所以在过滤后,表格将为:

ID|EMPLOYE|SALARY
-----------------
1   ALLAN  3000
4   BOB    2500

我已尝试使用自动过滤器,但它无法正常工作

1 个答案:

答案 0 :(得分:1)

没有VBA

D2 中输入:

=SUM($C$2:$C2)/SUM($C$2:$C$7)

并复制

E1 中输入:

80%

E2 中输入:

=IF(AND(D2>$E$1,D1>$E$1),1,0)

并复制

然后在 E 列上设置过滤器,仅显示 0&#39>

enter image description here