[VBA ] 擷取autofilter的criteria元素

[gitsvn (gitsvn)]

假設在一個sheet內有如下的資料
A       B       C       D
2       ooo     xxx     ooo
2       xxx     ooo     xox
2       xxx     xxx     xxx
5       ooo     ooo     ooo
5       ooo     ooo     ooo
5       ooo     ooo     ooo
5       ooo     ooo     ooo
5       ooo     ooo     ooo
6       ooo     xxx     ooo
6       ooo     xxx     ooo
6       ooo     xxx     ooo
7       ooo     xxx     ooo

如果對A列做autofilter, 有什麼方法可以獲得一個陣列
而這個陣列的內容是 {"2","5","6","7"}

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 223.136.106.64
※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1444037034.A.996.html
→ MOONRAKER: 都用VBA了 用foreach和dictionary就可以了