列をD列から最終列まで削除したい

お世話になっております。

なんかググっても見つけられなかったので基本的な質問失礼いたします。
件名の通りなのですが

いろ　はにほへと
ちりぬるを
　わかよたれそ
つねならむ
うゐのおくやま
けふこえて
あさきゆめみし
ゑひもせすん

上記のexcelがあった際に（”い”がA1　”ろ”がB1　”　”がC1）
D列から右すべて削除したい場合
どのようにVBAでは表記するのか伺ってよろしいでしょうか？

ググってみてもデータが歯抜けの場合はちゃんと取れない気がしております……

初心者の質問で申し訳無いのですがご助力頂けますと嬉しく思います。

行動規範の内容に同意します

回答1件

ベストアンサー

ちからずくですが、これでどうでしょうか。
もし、ZZ列より右側にデータがあるなら、もうすこし、きちんとやらないとだめですが。

VBA
1Public Sub D列以降を削除()
2    Range("D1:" & "ZZ" & Rows.Count).Clear
3End Sub
4

投稿2021/08/26 03:00

総合スコア5493

2021/08/26 03:44

Range("$D:$XFD").Clear とかでもいいかもですね。

2021/08/26 04:04

ありがとうございます…… ですが上記ではデータがそんなにないにも関わらずZZまで有効になってしまうのです……うーん

2021/08/26 04:07

と思いましたが元からZZまで有効でしたね…… jinojiさんの方法でも出来ますねっ

2021/08/26 04:07

それが何か不都合でも？まあ、Range("D1", Cells.SpecialCells(xlCellTypeLastCell)).Clear とかでもいいですが。

2021/08/26 04:10

いえいえ不都合は無いです。追加の方法もありがとうございますっ一番それっぽいのでこちらを利用させて頂きます。ありがとうございましたm(_ _)m

行動規範の内容に同意します

あなたの回答

tips

プレビュー

行動規範の内容に同意します

質問の解決につながる回答をしましょう。サンプルコードなど、より具体的な説明があると質問者の理解の助けになります。また、読む側のことを考えた、分かりやすい文章を心がけましょう。

15分調べてもわからないことは
teratailで質問しよう！

ただいまの回答率
85.37%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

関連した質問