Sub フィルターを複数条件で絞り込んで抽出する_配列版()
    
    '都道府県(1)都道府県(2)都道府県(3)という箱を3個作る
    ReDim 都道府県(1 To 3)
    
    'それぞれの箱に値を格納する
    都道府県(1) = "東京"
    都道府県(2) = "千葉"
    都道府県(3) = "埼玉"

                                    '1はA列のこと、C列なら3
    Range("A1:A6").AutoFilter Field:=1, _
                          Criteria1:=都道府県, _
                           Operator:=xlFilterValues

End Sub