- ベストアンサー
※ ChatGPTを利用し、要約された質問です（原文：セルの選択範囲を広げて消去したい）
セルの選択範囲を広げて消去したい方法とは？
このQ&Aのポイント
- Win7とExcel2007の初心者が、マクロを使用して特定のセル範囲を消去したい場合の方法を教えてください。
- 上記のコードを使用して、DK列のセル（※※のない行だけ）を消去することができました。しかし、複数のセル範囲（"BR30：EE30"）の場合は、どのようにすればいいでしょうか？
- 質問者は、ActiveCell列のセルではなく、複数のセル範囲（"BR30：EE30"）を、※※のある行の手前までをClearしたいと考えています。方法を教えてください。
- aitaine
- お礼率43% (170/393)
- Visual Basic
- 回答数1
- ありがとう数5
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
一例ですが Sub kigoumade() Range("DK30").Activate Do Until ActiveCell.Value = "※※" Range("BR" & ActiveCell.Row & ":EE" & ActiveCell.Row).UnMerge Range("BR" & ActiveCell.Row & ":EE" & ActiveCell.Row).Clear ActiveCell.Offset(1).Activate Loop End Sub では如何でしょうか。
お礼
ありがとうございます。今外出から帰ってさっそく実行したところ、思ったとおりのことが着実に実行されました。本等にありがとうございました。感謝感激です。嬉しいです。