[算表] EXCEL进阶筛选之条件用变量VBA

楼主: home0303 (Blue night)   2019-09-16 10:36:07
软件:EXCEL
版本:2010
Range("A1:A5").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range _
("A11:A12")
上面是用录制的程式码
请问有没有办法Set一个变量 可以将程式改成
Range("A1:A5").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=条件变量
假设我条件变量就是上下2个储存格
上面是 标题
下面是 王*
请问要如何创建这样的变量 谢谢
作者: newacc (XD)   2019-09-16 10:39:00
Dim rng As Range: Set rng = Range("A11:A12") 这样?
楼主: home0303 (Blue night)   2019-09-16 11:01:00
我是希望标题与条件不要先写在表格内 而是直接写入变量
作者: soyoso (我是耀宗)   2019-09-16 11:06:00
用range.autofilter以xlfiltervalues条件以array(...)方式,可不用写在储存格
楼主: home0303 (Blue night)   2019-09-16 12:42:00
谢谢S大

Links booklink

Contact Us: admin [ a t ] ucptt.com