このツールの機能を十分に発揮させるため、「設定ファイル」を作成してください。 簡単にできます。

こちらからどうぞ

　シートに張り付ける画像は、３００×２２５（６枚配置時）に設定しています。従ってそれ以上のサイズの画像を読み込む場合は、予めリサイズ（縮小）しておきましょう。簡単で便利なフリーソフト（ありがたいことです）があるのでこれを利用してください。
http://i-section.net/software/shukusen/ からダウンロードできます。取説もそこにありますが、簡単に説明しておきます。

　起動すると左図の画面が表示されますので、 サイズを「３００×３００（６枚配置の場合）」にしてください。
　 ファイルサイズは１０Ｋもあれば十分です。大きくても２０Ｋ程度にしておいてください。
　 「フォルダを作ってその中に保存」を選択し、フォルダ名はそのままでいいです。画像ファイルがあるフォルダに新たにフォルダが作成されます。
　 リサイズする画像のフォルダをエクスプローラ等で開きます。画像ファイルを選択（複数選択可。操作説明の「画像読込」の項を参照）し、「画像ファイルをここに・・」にドラッグします。 フォルダ内の全ファイルを選択するときは、エクスプローラメニューの「編集」−「すべて選択」を使用します。それでお終い。

　さて、このように便利なツールですが残念なことに、ファイルのタイムスタンプがリサイズ時に変更されてしいます。これを防止するには新鮮なうちにリサイズする、システム時計の設定を変更する（爆）、日付変更ソフトを利用する等があります。
　 ２番目の選択肢は論外として、日付変更のフリーソフトは「日付変更専」というのが使いやすいようです。ただし、 .NET Framework 2.0が必要です。インストールされていなければこの際入れておきましょう。

　本ツールに画像を読み込む際は、そのリサイズされたフォルダ（デフォルトはResized｣）を選択し、画像を読み込んでください。

　黄色文字をクリックしてください。
毎度同じパターンで済みません。

　コマンドボタンをロールオーバー（といっても背景色が変わるだけだけど）にしてみました。
　 VBAにはMouseMove(マウスが乗ったとき)のイベントしかないので不便です。

　間違ってフォームを閉じてしまったら、例によって「ツール」−「マクロ」−「マクロ」
「Ｍｅｎｕ」で開きます。

１．以前「保存」したデータを再編集するときは「読込」（７以下へ進む）
２．新規作成のときは「配置枚数」を設定
３．「ファイル名情報」を使用するかどうかの設定
４．「配置調整」 （６枚配置で同一種の画像が奇数枚のとき右に空白画像を入れる）設定
５．「画像」の「作成」または「撮影」の設定
６．「日付」を西暦にするか和暦にするのかの設定
７．「画像取込」
８．不必要な画像があれば「削除」
９．足りない画像があれば「挿入」
１０．全部やり直すときは「全削除」
１１．「画像の説明」を入力、オートシェイプでお絵描き（使いにくい、苦情はMSに）
１２．「印刷」（ＰＤＦまたはペーパーに出力）
１３．後日の修正があったときのため、またはシート保存のために「保存」
１４．「終了」

　 当初は読み込んだファイルを配列で管理していたのだが、ありゃＶＢＡでは配列のアドレスはどうやって渡すんだ？Ｃではポインタで簡単に渡せるのに。結局、配列のコピーができず（個々の要素をコピーすればできるけどコードがすっきりせん）、そうそう構造体配列なら一括コピーができたはずと変更。ＶＢＡ侮るべからず。
　 以前、どこかの板で構造体と書いたら「構造体じゃない！ユーザー定義型だ」と怒られた。何ぬかしやがる。アセンブラの昔から構造体は構造体じゃ。

　ということでオブジェクト指向はよく分からないけど、こういうことができるはず、とネットで検索しまくり、目的の記述を見つけたときには、情報提供者に感謝感激。￥になる訳でもないのに、奇特な人々のお陰で必要な情報にありつくことができる。昔なら、本屋に駆け込んでいたところだが、ネット様々。

　歳食ってくると、開発は短期集中でやらないと昨日のことでも忘れてしまう。なんでこんなコードがあるの？と変更すると、ありゃ、やっぱり必要なコードだったということもしょっちゅう。いちいちドキュメントを書いておけばいいのだけど。
　 ということで、たった千数百行のコードに時間を食ってしまった。歳は取りたくないもんじゃ。さ、仕事しなくちゃ(07/06/29)。

　と思ったら、ちょっとひらめいて、削除と挿入のインターフェイスを変えたのでした。また何かひらめくかも(07/06/30)。