No.4ベストアンサー
- 回答日時:
マクロを使う別の方法です。
XXXの部分を特定の文字に置きかえて実行してください。
また、「特定の文字があれば」というのが、その文字列を含む、というのでなくセルの値がその文字列ならば、というのであれば、LookAt:=xlPart の部分を LookAt:=xlWhole に書き換えてください。
Sub DelLines()
Dim R As Range
Do
Set R = ActiveSheet.Range("B:B").Find(What:="XXX", LookAt:=xlPart)
If R Is Nothing Then Exit Sub
R.EntireRow.Delete
Loop
End Sub
No.3
- 回答日時:
もしB列に「特定の文字」を含む文字列があった場合という意味でしたら、こういうのはマクロの出番ですね。
以下の手順を試してみてください。
1.Altキー+F11キーでVisualBasicEditorを呼び出します。
2.メニューから挿入、標準モジュールで出てきたコードウィンド(右側の白い広い部分)に以下のコードをコピペします。
ただし、以下の"*特定の文字*"の中の「特定の文字」は、実際のものに変えてください。
'*****ここから下をコピペ*****
Sub test01()
With ActiveSheet
x = .Cells(.Rows.Count, "B").End(xlUp).Row
For i = x To 1 Step -1
If .Cells(i, "B").Value Like "*特定の文字*" Then
.Rows(i).Delete
End If
Next
End With
End Sub
'*****ここより上までをコピペ*****
3.Alt+F11キーでワークシートへもどります.
4.メニューから、ツール、マクロ、マクロで出てきたマクロ名(test01)を選択して実行
いかがでしょう?
ご回答いただきましてありがとうございます。
詳しくご説明まで頂、大変わかりやすかったのですが、
私のやり方が悪いのか、マクロを実行いたしましたが、何もおこりませんでした。なぜでしょう。
お忙しい中ありがとうございました。
No.1
- 回答日時:
並び替えを使う方法です。
データはA列とB列まで入っているとし、「特定の文字」を「対象」とします。
1)C列に頭から順に、1,2,3,4と下まで入力していきます。
2)D1セルに「=IF(ISNUMBER(FIND("対象",B1)),"要削除","")」と入力し、以下コピー
3)シート全体を選択後、D列をキーにして降順に並び替え。 ⇒上側に「要削除」が集まる。
4)D列に「要削除」とある行を選択して、行削除。
5)シート全体を選択後、C列をキーにして昇順に並び替え。
6)C列とD列を削除。
ご回答いただきましてありがとうございます。
なるほど対象文字の列に印をつけて並べ替えて削除ですね。
こういったやり方もあるのですね、大変参考になりました。
ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 特定の文字を簡単な操作で半角スペースに変換するか削除したい 2 2022/11/01 10:35
- Visual Basic(VBA) エクセルのマクロについて教えてください マクロを実行すると メッセージボックスが表示されて okをク 4 2023/07/05 19:32
- Excel(エクセル) VBA 文字列変換と指定した列にある日時データから時間を削除する方法について 2 2022/04/14 15:23
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/08/10 14:24
- Excel(エクセル) VBA 指定した列にある日時データから時間を削除する方法について 4 2022/04/14 11:17
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/10 11:34
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/25 16:07
- Visual Basic(VBA) VBAで、特定の文字より後を削除して残った数値を文字列に変換と特定の文字より前も削除したい 3 2022/04/15 19:21
- Excel(エクセル) エクセルの使い方について 2 2023/02/07 20:54
- Excel(エクセル) 【マクロ】マクロが保存されているエクセルとは、別のエクセルブックの全シートの非表示列を再表示したい 1 2022/12/24 20:48
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
IF関数などを使って条件に合った「行」を削除するような機能はありますでしょうか?
Excel(エクセル)
-
エクセルである行以下全部を削除する方法
Excel(エクセル)
-
指定した文字があった場合、その行を削除するマクロが欲しいです
Excel(エクセル)
-
-
4
エクセル 指定した文字列を含む列を削除するには
Excel(エクセル)
-
5
エクセル・条件付で行を削除する方法
Excel(エクセル)
-
6
エクセルで特定の文字が入ってる列を削除方法
Excel(エクセル)
-
7
エクセル2016の特定の文字列を含む行を削除
Excel(エクセル)
-
8
EXCELで条件に合わない行を削除して詰めて新しいシートに表示したいのですが
Excel(エクセル)
-
9
【Excel VBA】複数ある特定の文字列を含む行を削除
Excel(エクセル)
-
10
エクセルで特定のセル以下の全部のセルの選択方法
Excel(エクセル)
-
11
Excelで特定の文字以下を削除したい
Excel(エクセル)
-
12
Excelで、任意の言葉で始まる行のみを、行ごと一括で削除する方法を教
Excel(エクセル)
-
13
特定の文字がある行以外を削除するマクロ
その他(Microsoft Office)
-
14
VBAで特定の行と一つ上の行を削除するマクロについて
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセル初心者です 関数の入れ...
-
エクセルで二つの数字の小さい...
-
LOOKUP関数を使えばいいのでし...
-
PowerPointで表の1つの列だけ...
-
エクセルで最初のスペースまで...
-
エクセル 文字数 多い順 並...
-
VBAで文字列を数値に変換したい
-
2つのエクセルのデータを同じよ...
-
Excelで半角の文字を含むセルを...
-
エクセルの並び変えで、空白セ...
-
EXCELで 一桁の数値を二桁に
-
エクセルの表から正の数、負の...
-
Excel、市から登録している住所...
-
エクセルで文字が混じった数字...
-
A列がない・・・A列が非表示に...
-
エクセルの項目軸を左寄せにしたい
-
エクセルで一列おきに空白列を...
-
【ACCESS/必須条件とOR条件を組...
-
エクセルの隣り合う列のグループ化
-
エクセル(勝手に太字になる)
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで二つの数字の小さい...
-
PowerPointで表の1つの列だけ...
-
エクセルで最初のスペースまで...
-
2つのエクセルのデータを同じよ...
-
エクセル(勝手に太字になる)
-
「B列が日曜の場合」C列に/...
-
エクセル 文字数 多い順 並...
-
EXCELで 一桁の数値を二桁に
-
エクセル 同じ値を探して隣の...
-
VBAで文字列を数値に変換したい
-
エクセルの並び変えで、空白セ...
-
Excelで半角の文字を含むセルを...
-
エクセルで文字が混じった数字...
-
Excel、市から登録している住所...
-
A列がない・・・A列が非表示に...
-
エクセルの表から正の数、負の...
-
[関数得意な方]教えて下さい・...
-
エクセルの項目軸を左寄せにしたい
-
エクセル 時間帯の重複の有無
-
Excelにてある膨大なデータを管...
おすすめ情報