[算表] vba -> autofilter的array指定儲存格?

[ptguitar (佩蒂吉他)]

軟體:excel

版本:2007以上

我錄了個巨集
其中一段篩選

 Sheets("貼上").Select
    Range(Range("A4"), Range("k4").End(xlDown)).Select
    Selection.AutoFilter
    ActiveSheet.Range(Range("A4"), Range("k4").End(xlDown)).AutoFilter _
    Field:=3, Criteria1:=Array("A","B","C","D"),  Operator:=xlFilterValues
    Range("A1:K500").Select
    Selection.Copy
    Sheets("test").Select
    Range("A1").Select
    ActiveSheet.Paste

上面的array陣列區 是要篩選的條件

因為常常要變動 每次進去改巨集很麻煩

不知道要怎麼指定 我假設要指定到【設定】工作表的A1:A10

那邊要怎麼寫? 感謝各位大大指教



--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 1.34.252.11
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1488443152.A.629.html
→ soyoso: 以range.advancedfilter 來指定條件儲存格
→ soyoso: 如以range.autofilter的話，設個變數，workfunction
→ soyoso: transpose指定原文內a1:a10的資料
→ soyoso: 再將條件指定該變數，變數型態為variant
→ ptguitar: 我研究一下workfunction.transpose方法看看