- ベストアンサー
※ ChatGPTを利用し、要約された質問です（原文：連続して同じ値が入ってるなら削除したいのですが）
VBAで連続した同じ値を削除する方法
このQ&Aのポイント
- VBAのコードを使用して、連続して同じ値が入っているセルを削除する方法をご説明します。
- 指定した値および連続して同じ値が入っているセルを削除するVBAのコードを紹介します。
- 質問のコードでは、間違った条件で削除を行っているため、連続して同じ値が入っているセルが削除されません。正しい条件を指定する必要があります。
- PZHLSAGVIG
- お礼率100% (68/68)
- オフィス系ソフト
- 回答数2
- ありがとう数17
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
こんにちは！ ＞f Cells(i, 1) = Cells(i - 1, 1) = mystr Then の行を ＞If Cells(i, 1) = Cells(i - 1, 1) And Cells(i, 1) = mystr Then にしてみてください。 ※ AND もしくは OR はワークシート関数でも一緒ですが、 一つ一つきっちり指定する必要があります。m(_ _)m
その他の回答 (1)
- mshr1962
- ベストアンサー率39% (7417/18945)
回答No.2
＞If Cells(i, 1) = Cells(i - 1, 1) = mystr Then 式が成立しません。=は一つしか使えませんから。。。 If Cells(i, 1) = Cells(i - 1, 1) And Cells(i, 1) = mystr Then Rows(i).Delete End If のようにAnd やOr を使うか If Cells(i, 1) <> Cells(i - 1, 1) Then '処理なし Else If Cells(i, 1) = mystr Then Rows(i).Delete End If のように条件分岐してください。
質問者
お礼
ご回答ありがとうございました。
お礼
ご回答ありがとうございました。