下列程式碼,是我錄製巨集,篩選後取得的程式碼,請教如何將,篩選條件("1103", "1104")用變數的值取代
PS:假設變數的值,在工作表A1 及A2 取得
ActiveSheet.Range("$A$2:$XFC$1602").AutoFilter Field:=1, Criteria1:=Array("1103", "1104"), Operator:=xlFilterValues
ActiveSheet.ShowAllData
vba程式碼,如何將變數的值做為篩選條件?
2016-08-12 10:57 pm
回答 (2)
2016-08-16 2:34 pm
回覆Cheng大,您說的是下列程式碼嗎?我測試結果篩選不到資料
Ra = Range("a1")
Rb = Range("a2")
ActiveSheet.Range("$A$2:$XFC$1602").AutoFilter Field:=1, Criteria1:=Array(Ra, Rb), Operator:=xlFilterValues
Ra = Range("a1")
Rb = Range("a2")
ActiveSheet.Range("$A$2:$XFC$1602").AutoFilter Field:=1, Criteria1:=Array(Ra, Rb), Operator:=xlFilterValues
2016-08-16 12:24 am
Ra=Range("A1")
Rb=Range("A2")
Array(Ra, Rb)
Rb=Range("A2")
Array(Ra, Rb)
收錄日期: 2021-05-03 13:50:32
原文連結 [永久失效]:
https://hk.answers.yahoo.com/question/index?qid=20160812145724AAGt4pz