質問: エクセルで次々と画像を表示させたい 例えば、sheet1に、支店番号、支店名、住所、電話番号、地図(jpgファイル名)等の項目を作り、100件以上のレコードが入っている表があります。 sheet2に、上記の1レコード(=1支店)分のデータをa4用紙に見やすく配置したフォーム(?)を作り、vlookup関数を使って、データを表示させるようにしました。(つまりa支店の支店番号を選ぶとa支店のデータが、b支店の支店番号を選ぶとb支店のデータが表示) ★この時、それぞれのレコードのjpgファイルの画像も表示させたいのですが、どのようにすればできるのでしょうか? ハイパーリンクのように他に飛んで表示させるのではなく、エクセルのその場所に表示させたいのです。(1支店分をa4用紙で印刷したいので) 別のシートで、実際に画像を貼付たものとその名前のデータベースを作り、それとリンクを貼る。という方法を知ったのですが、レコード件数がかなりあるので、この方法はちょっと使えません。 他に何かいい方法をご存知の方がいらっしゃいましたら、どうか教えて下さい!関数、visual basicの使用でも構いません。 ちなみに画像は、エクセルファイルの置いてある下(サブフォルダ)にまとめて入れております。宜しくお願い致します。
回答: #1です。 ちなみにファイルのパスは例の通りでなくても大丈夫のハズです。 但し、 1)excelファイルのあるフォルダのサブフォルダ名は「image」 2)エラー時用のファイル名は「noimage.jpg」 この2つを変える場合はコードの記載にある同様の部分を修正する必要があります。 "\image\" → "\好きなフォルダ名\" "\image\noimage.jpg" → "\好きなフォルダ名\好きなファイル名.jpg" カスタマイズですが、 *支店コードを入れるセルを変えたい場合 "$a$1" を好きなセルに変えます。 但し、それによって地図ファイル名を表示させるセルは必ずその右隣のセルにします。 例)"$a$1" → "$d$5" にした場合、"e5"に地図ファイル名をvlookupで表示 *画像を表示する位置を変えたい場合 全部で3箇所ある "$c$1" と "c1" を好きなセルに変えます。 *表示する画像のサイズを変えたい場合(今は横320x縦240です) .range("c1").left, .range("c1").top, 320, 240) の 320 と 240 を変更します。