可視セルの削除

質問

オートフィルタで抽出したデータを行ごと削除するのですが、
可視セルで検索をすると、1列目の見出し行も含まれてしまいます。
1列目を除くには、どのように記述したらいいのでしょうか？
Selection.AutoFilter
Selection.AutoFilter Field:=5, Criteria1:="="
Selection.SpecialCells(xlCellTypeVisible).Select
↑これで、今、削除したい部分、プラス見出し行が選択されています。

回答No.1

noname#52504 · ベストアンサー

もっとスマートな方法もありそうですが、とりあえず。

Selection.Resize(Selection.Rows.Count - 1).Offset(1, 0).SpecialCells(xlCellTypeVisible).Select
[選択している範囲について、行数を1行減らし、1行下方にずらした範囲の、可視セルのみを選択]

お礼

お返事遅くなってすみませんでした。
やってみたら、バッチリできました！！
ありがとうございましたー！！