手元のExcel 2013で試してみましたが､次の手順でできそうです｡
VBAにする場合は､ﾏｸﾛの記録を使って手順を記録させてください｡

1．対象の表全体を選択して､｢ﾃﾞｰﾀ｣ﾀﾌﾞの｢ﾌｨﾙﾀｰ｣でﾌｨﾙﾀｰを適用します｡

2．A列のﾌｨﾙﾀｰの｢▼｣を選んで､｢ﾃｷｽﾄ ﾌｨﾙﾀｰ｣の｢指定の値を含む…｣で条件を｢商品｣として､A列に商品を含むものだけ表示します｡

3．その状態で最初の行を選択し､｢Shift｣を押しながらと最後の行を選択して､全体を選択します｡(この状態でﾌｨﾙﾀｰをｸﾘｱしても､見えなくなっている部分が選択されてしまうので次の4の手順が必要です｡)

4．｢ﾎｰﾑ｣ﾀﾌﾞの｢検索と選択｣の｢条件を選択してｼﾞｬﾝﾌﾟ…｣を選び､｢可視ｾﾙ｣を選択します｡(この4．の操作は｢Alt｣＋｢;｣でもできます｡)

5．A列のﾌｨﾙﾀｰの｢▼｣を選んで､｢"(列A)"からﾌｨﾙﾀｰをｸﾘｱ｣を選びます｡

これで該当行だけが選択された状態になるかと思います｡