• ベストアンサー

行の削除

エクセル2003で作業しています。 AAAA BBBB AAAA BBBB …… …… というような感じで文字が数千、列になっていて、このB行だけを全て削除したいんですが どういうやり方があり、簡単でしょうか?

質問者が選んだベストアンサー

  • ベストアンサー
  • zongai
  • ベストアンサー率31% (470/1474)
回答No.2

オートフィルタを使ってみて下さい。 オートフィルタの基本を整理しよう - [Excelの使い方]All About http://allabout.co.jp/computer/msexcel/closeup/CU20070715A/ 「BBBB」でフィルタリングして、その行を選択、削除して下さい。 その後、オートフィルタを解除。 でどうでしょうか?

pinky13k
質問者

お礼

皆さん、早々の回答本当にありがとうございました。 オートフィルタで解決しました。

その他の回答 (3)

  • imogasi
  • ベストアンサー率27% (4737/17069)
回答No.4

VBAなら A列の最下行を求める。最下行から上行に1行ずつ、bbbを判断して そうであれば、行を削除。 下から上へ見ていくこと。 Sub test02() d = Range("A65536").End(xlUp).Row For i = d To 1 Step -1 If Cells(i, "A") = "bbb" Then Rows(i).EntireRow.Delete End If Next i End Sub ーー 操作なら フィルタでbbbをだし、DELETEで削除 編集ージャンプーセル選択ー空白セル 編集ー削除

  • fujillin
  • ベストアンサー率61% (1594/2576)
回答No.3

マクロの案は既回答にあるので、手動の案を オートフィルタで対象行だけ選択して、行の削除、後にオートフィルタを解除

  • taka108
  • ベストアンサー率44% (8/18)
回答No.1

マクロを使用する場合は、たとえば以下を実行することでできます。 Sub test() Range("A1").Select Do Until Selection.Value = "" If Selection.Value = "BBBB" Then Rows(Selection.Row).Delete Shift:=xlUp Selection.Cells(2, 1).Select Loop End Sub

関連するQ&A

専門家に質問してみよう