excel vba 实现 多列数据筛选并对筛选后的数据进行操作

Question

例如:
根据D列筛选出"科目1";
再根据B列筛选出"计算机";
再根据E列筛选出"张三";
筛选出的数据,对J列数据求和,如果为0，则标为绿色，如果不能的，正数的就标黄，非正数的就标红
这只是其中一个例子,表中的所有数据都要标上颜色.
感激不尽!

Answer 1

这时候就不用筛选功能了，直接vba里边3重循环对3列数据进行搜索，然后用hlookup功能offset到j列把数值累加到一个变量里，最后判断该标什么颜色表什么颜色

Answer 2

筛选后求和的公式是
=subtotal(9,b2:b99)
对ab列进行筛选，筛选a列的“a”，并求和的代码如下：
sub
xxx()
activesheet.range("$a$1:$b$999").autofilter
field:=1,
criteria1:="a"
dim
xrng
as
range
set
xrng
=
range("b2:b999")
msgbox
worksheetfunction.subtotal(9,
xrng)
end
sub

Answer 3

不太明白你的意思，但是可以参考我的另外一个帖子，也是要求变色的。
http://zhidao.baidu.com/question/2074152501442633708.html?oldq=1