excel vba 进行循环筛选的问题请教

2025-01-06 02:41:18
推荐回答(3个)
回答1:

既然要用VBA代码,就没必要再用筛选了,VBA代码可以根据你的要求,将("$A$1:$H$100").的内容分类填充到各个指定的表中!只是你的要求不是很具体,我暂不去猜想!请你把要求的条件尽量具体化,别人清楚了,才好帮助你!

回答2:

dim aa
亲,天天用的东西,还是要熟悉点才好!
for i= 1 to n(自己设定几次)
select case aa
case 1
aa="AAA"
CASE 2
aa="BBB"
......
end select
Selection.AutoFilterActiveSheet.Range("$A$1:$H$100").AutoFilter Field:=3, Criteria1:=aa

回答3:

dim
s()
as
string,
i
as
long
s=split("AAA|BBB|CCC|DDD|EEE|FFF|GGG","|")
Selection.AutoFilter
for
i=0
to
ubound(s)

ActiveSheet.Range("$A$1:$H$100").AutoFilter
Field:=3,
Criteria1:=s(i)

……
'保存筛选结果的语句,可以用i来区分保存的sheet
next