VBAで画像の中央揃え

EXCELでは画像の中央揃えが面倒なので、
VBAで画像の中央揃えを試してみた。

1.単独画像の場合(3行5列目の画像)
(1)動作前

(2)動作後(マーカー中央のボタンを押す)

(3)VBAプログラム

2.複数画像の場合
(1)動作前(1から3の3画像)

(2)動作後(一斉マーカー中央のボタンを押す)

(3)VBAプログラム

3.参考資料
  下記のWEBページにお世話になりました。ありがとうございます。
 ・Excelセルの中央に画像を配置する方法は?
 ・Excelで写真や図形を指定の場所へ移動する方法。幅も連動可

<個人的な感想>
さすがにVBAの威力は大したものである。
EXCELでも”MicroSoftにやる気”があれば、セルの中央合わせは機能が実現できるはず。