EXCELで式での空白セルの挿入方法

質問

Ａ列は空白行で、Ｂ列は数値が入っていたり空白だったりする行で構成されています。
またＣ列からＤ列までの全ての行には数値が入っています。
この時Ａ列に条件付き数式を入力して、Ｂ列が空白でなければＢ列に空白セルを挿入して現Ｂ列からＤ列を右にシフトさせたいのですが、数式で可能でしょうか？
数式で可能ならばＡ列に入力する式を、不可能なら参考のためＶＢＡでの記述をお教え頂けると嬉しいです。（ＶＢＡはあまり理解しておりませんが。）

例
【処理前】
Ａ列　Ｂ列　Ｃ列　Ｄ列　Ｅ列
　　　　22　　　33　　44
　　　　　　　　 55　　66
　　　　77　　　88　　99
　　　　　　　 100　　101

【処理後】
Ａ列　Ｂ列　Ｃ列　Ｄ列　Ｅ列
式　　　　　　　22　　33　　44
式　　　　　　　55　　66
式　　　　　　　77　　88　　99
式　　　　　　100　　101

２万行の処理を１回のみしたいです。
宜しくお願いします。

回答No.2

keithin · ベストアンサー

ＡＬＴ＋Ｆ１１を押す
現れた画面で挿入メニューから標準モジュールを挿入する
現れたシートに下記をコピー貼り付ける

sub macro1()
　range("B:B").specialcells(xlcelltypeblanks).delete shift:=xlshifttoleft
　range("B:B").insert shift:=xlshifttoright
end sub

ファイルメニューから終了してエクセルに戻る
ＡＬＴ＋Ｆ８を押してマクロを実行する。

＃補足
マクロでやらせていることをそのまま手動で行っても、簡単にできます
手順：
Ｂ列を列選択する
Ｃｔｒｌ＋Ｇを押す
現れたダイアログでセル選択をクリックする
現れたダイアログで空白セルにマークしてＯＫする
Ｂ列の空白セルが飛び飛びに選択されるので、それを崩さないように右クリックして削除を開始、左に詰める
Ｂ列を列選択、列番号Ｂのところで右クリックして挿入で空列を１列挿入、Ｃ列に送る

＃参考
Ａ列に数式とか条件付き書式を置いて、他のセルを動かしたり編集したりといったことは、エクセルでは一切できません。

お礼

keithin様

早速のご回答、ありがとうございました。
＃補足にてご教授頂いた手動の方法で行ないました。
結果オーライで助かりました。
ありがとうございました。

回答No.1

大明神（@bathbadya）

処理前と処理後は同じシートでなければだめですか？
違うシートや違うファイルに出来るなら簡単な式でできますが・・

お礼

bathbadya様

今回はNo.2様にお教え頂いた方法で解決いたしました。
いろいろな方法が有るものですね。
ありがとうございました。