こんにちは。
写真管理用に、“同じフォルダに入っている画像をWordファイルに張り付けるマクロ”を作りました。
意図をうまく一言で伝えられないのですが、サムネイルを作るというか…写真表を作るというか…工事写真集を作るというか。タイトルもなんて書いたものか…まぁ百聞は一見に如かず、前半だけ読んでください。
【１】Wordファイルのダウンロードリンク
とりあえず細かいことは置いておいて、まずファイルを置きます。↓ダウンロードリンク
【２】細かいこと
①使い方＆目的
このWordファイルを“マクロ有効”で開き、左上のボタンを押すと、そのWordファイルと同じフォルダに入っている画像を、Wordに貼り付けます。
【注】すでに貼り付けてある画像は消えます。
②あとは待てば出来上がり。画像ファイルが数枚ならすぐ終わりますが、いっぱいあるとちょっと待たされます。
ちなみに、フォルダ名と同じwordファイルにしたほうが管理しやすいので、終了時にフォルダ名とWordファイル名が一緒か比較して、違う場合はフォルダ名で別名保存するか確認します。
あと、pdfはあったほうが良いので問答無用で保存します。
③細かい仕様
・画像ファイルは自動で幅220px、または高さ200pxに拡大縮小します。等比で拡大縮小するので、普通の横向きの写真は幅220pxで高さが160pxくらいになります。
・画像ファイルはWordに貼れそうな拡張子のものを全部貼り付けようとします。拡張子は”jpg”, “jpeg”, “bmp”, “png”, “tif”, “tiff”です。（もしかしてtiffは貼れないのでは？って気もしますが・・・）
貼れないとき？その時はたぶん良く分からないエラーで中断します。
・最大数の制限は掛けていません。従って、多すぎると固まったかのようになるかもしれません。
マクロはロックを掛けてないので、各自お好きなようにモディファイしてください。以上。
【３】作ったきっかけ
なぜこんなものを作ったのかというと…最近、写真がずいぶん増えまして、整理しようと思ったんです。
なんせ写真を撮るコストが劇的に下がったので、一度に2・3枚とったり、クソみたいなどうでも良い写真を撮ったりで、マイピクチャの中身はもう膨大なものです。そのまま画像でフォルダにぶち込んでおくと、GoogleフォトやAmazonフォトがかき集めてしまって大混乱です。従って、要らなそうな写真をzipに固めて、どこかにしまっておこうと考えたわけですが…しまい込んでしまうともう見なくなってしまうから、サムネイルシートみたいなものが作りたいなぁと思ったわけです。
また並行して、仕事でもサムネイルシートを作りたい場面がありました。
例えば報告書の類の最終ページなどに、写真をたくさん貼るという作業があります。工事写真用のExcelのマクロなら既にあります。ところが、Word用って無いのですよね…。いつか書きますが、私は印刷を前提としたファイルは原則Wordで作りたい派なのです。
また、昨今ファイルサーバーがひっ迫しており、サーバーに写真を入れている職員に、写真をサーバーに入れないことをどう納得してもらうか考えてました。サムネイルだけサーバーに入れるのを許可すれば、納得してもらえるのではないかと思ったわけです。
ところが、探してみると案外サムネイルを作る良いソフトが無くて…しばらくはPrimgというサムネイルを印刷するソフトと、Cube-PDF Printerという印刷物をPDFにするソフトを組み合わせていました。
Primg
http://www.vieas.com/ フリーソフト＆壁紙ギャラリー – Vieas Web
http://www.vieas.com/software/primg.html
手軽に画像を印刷するためのソフトです。3種類の印刷方法(サムネイル/シングル/定形マルチ)があり、サムネイル印刷や証明用写真の印刷等が可能です。
↓Cube-PDF／仮想PDFプリンタ
https://www.cube-soft.jp/ 株式会社キューブ・ソフト (CubeSoft, Inc.)
https://www.cube-soft.jp/cubepdf/
前述の方法でも結構いい感じのファイルが作れるのですが
①Primgで目的のフォルダまで下りていくのが面倒。
※このフォルダから…みたいにやりたい。
②CubePDFで保存先を指定するのも面倒。
※画像のあるフォルダに作りたい
③細かいカスタマイズがしたい。報告書の文末に貼りたい(つまりWordだと楽。）
などの要求があってマクロを組んでみました。
もうちょっとよく探したら、どっかにありそうなんですけどねぇ。
コードは長くなったので別にします。