オートフィルターをかける

RANGE.AutoFilter Field:=1, Criteria1:="ほげ"

Fieldで列番号、Criteriaでフィルターをかける条件を指定します。