- Excel VBA 質問スレ Part44 [無断転載禁止]©2ch.net
293 ：デフォルトの名無しさん[sage]：2016/12/06(火) 05:33:01.09 ID:epR51daM - フィルターに関する質問です。A列に色々な果物の名前が入っているとします。
A列にフィルターを適用し、マクロの記録で「いちご、みかん、りんご」で抽出すると
次のようなコードが出ます。
Sub Macro1()
ActiveSheet.Range("$A$1:$A$19").AutoFilter Field:=1, Criteria1:=Array("いちご" _
, "みかん", "りんご"), Operator:=xlFilterValues
End Sub
この "いちご" , "みかん", "りんご" の部分を変数に置き換えて次のようにしましたが
うまく抽出されません。どこがいけないのでしょうか。
Sub Macro2()
Dim fruits As String
fruits = "いちご" & "," & "みかん" & "," & "りんご"
ActiveSheet.Range("$A$1:$A$19").AutoFilter Field:=1, Criteria1:=Array(fruits), Operator:=xlFilterValues
End Sub
|