VBAでAutoFilterの複数列の条件を追加する場合
Sub midashi()
Range("B3:D15").AutoFilter _
Field:=2, _
Operator:=xlFilterValues, _
Criteria1:=Array("あああ", "")
Range("B3:D15").AutoFilter _
Field:=3, _
Operator:=xlFilterValues, _
Criteria1:=Array("10", "15")
End Sub