作者tina1688
看板Office
标题[算表] 依据清单筛选其他档案资料VBA
时间Mon Sep 9 14:58:31 2019
请教各位大大
如何运用VBA
依据筛选清单
筛选其他档案的多笔编号
如下示意图
录了聚集不知如何嵌入变数进去array
再麻烦大大解惑
谢谢喔
https://i.imgur.com/dHHXVjc.jpg
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 101.10.23.54 (台湾)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1568012313.A.00C.html
1F：→ soyoso: 不太了解什麽意思？录了"巨集"不知如何嵌入变数进去array09/09 15:04
2F：→ soyoso: 但没有看到内文有贴巨集09/09 15:04
3F：→ soyoso: 还有就是筛选後要做什麽？回传b栏产品？09/09 15:05
4F：→ soyoso: 还是要将筛选後的资料另存在其他活页簿，工作表内09/09 15:06
大大，不好意思补充说明
档案一和二是依据清单筛选就好
为了方便比对资料用
剩下疑问是
不知道如何塞清单变数进去
如下图
https://i.imgur.com/fkGBHM2.jpg
※ 编辑: tina1688 (101.10.23.54 台湾), 09/09/2019 17:13:07
※ 编辑: tina1688 (101.10.23.54 台湾), 09/09/2019 17:14:37
5F：→ soyoso: 设个有变数a(元素个数)，回圈，於range.specialcells可见 09/09 17:18
6F：→ soyoso: 储存格，将资料指定到该变数a，元素索引方面也设个变数b来 09/09 17:18
7F：→ soyoso: 累加(如变数b=变数b+1) 09/09 17:18
8F：→ soyoso: 最後改为criteria1:=变数a 09/09 17:18
9F：→ soyoso: 补充一下回圈於range.specialcells可见储存格，是因为看到 09/09 17:23
10F：→ soyoso: 工作表"档案一"和"档案二"有筛选，回文才这样建议，如果没 09/09 17:23
11F：→ soyoso: 有筛选，是以"筛选清单标准"的话，可能就是回圈判断、 09/09 17:23
12F：→ soyoso: range.find或是range.autofilter，来读进变数a内 09/09 17:23
13F：→ tina1688: 大大谢谢我来研究看看。感恩 09/09 22:02