まえきんブログ

2024/2/11~ WordPress版ブログへお引越ししました🖊(詳細はトップページ記事をご参照頂ければと存じますm(_ _)m)

【Excel VBA学習 #54】特定のセルの上に行を挿入する

まえきんです!

今回は特定のセルの上に行を挿入する

方法について学習しましたのでご紹介します。

f:id:maekinblog:20210225224312p:plain

A列に文字列が入力されています。今回は「Excel VBA スキルアップ」の

上に新しい行を挿入するマクロを考えます。行を挿入することで、

調べるセル範囲の大きさが変化するため、繰り返しの回数をあらかじめ

決められずFor Nextステートメントが使えません。

そこで、Do Loopステートメントの登場です。イメージ的には、

「セルが空欄になるまで」を繰り返し調べる感じです。

簡易的にマクロの実行ボタンを作成して、上記のコードを

実行すると下記のように結果が得られます。

【実行前】

f:id:maekinblog:20210225224919p:plain

【実行後】

f:id:maekinblog:20210225224945p:plain

A列の「Excel VBA スキルアップ」に一致する場合のみ

行全体が挿入されていることが確認出来ました!

最後まで読んで頂きありがとうございました!ではまた!