人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

Excel VBA のコードをお願いいたします。

?.自動でB列に画像ファイルを挿入
例えばC:\キャプチャ\ゲームというフォルダがあった場合、そのフォルダ内の画像を全て高さ1cm、幅6cmで挿入※縦横比無視、
1行につき1枚、セルの幅、高さは自由 ただし画像はセルの中央へ

?.自動でA列にフォルダ名をコピペ
?で貼り付けた画像の左隣(A列)に画像の格納されていたフォルダ名をコピペ。

こちらで指定していない部分(エクセルのファイル名、シート名等)は自由です。
A列の並びは五十音順にして頂けるとありがたいです。
詳しくは画像を参照してください。

何卒よろしくお願いいたします。

1383824213
●拡大する

●質問者: tyyyu2005
●カテゴリ:コンピュータ
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● lang_and_engine
●100ポイント ベストアンサー

こんにちは。ご要望のマクロを作成してみて,動作確認が取れましたので,下記のエントリに掲載しておきました。
ご利用ください。


Excel VBAで,フォルダ内の画像ファイルを一括でシートに取り込み,サムネイルのアルバムを自動生成
http://d.hatena.ne.jp/language_and_engineering/20131109/GenerateImageThumbnailAlbumByExcelVBA


tyyyu2005さんのコメント
ありがとうございます。 すばらしいです。希望通りのものを作って頂き感謝致します。

tyyyu2005さんのコメント
lang_and_engine様 早速使わせて頂いております。 恐縮ながら一つ注文がございます。 取り込む画像が1000を超えた状態でマクロを走らせるとメモリ不足となってしまいます。何かいい方法はないでしょうか。

lang_and_engineさんのコメント
いくつか対処法があります。 ・マクロ実行の前に,画像のサイズをあらかじめ一括して縮小処理しておき,そのうえでマクロを走らせる。そうすれば,扱う画像の総容量が小さくて済む。画像のサイズの一括変更のためには,下記の記事に載っているフリーソフトなどを使う。 >画像を多数Wordに貼り付けてレポートを作る。デジカメ画像サイズを一括変更 - プログラミングとIT技術をコツコツ勉強するブログ >http://d.hatena.ne.jp/TipsMemo+computer-technology/20130925/p2 ・シートを分割する。一度に実行する画像の数を1000個以内にして,何回かに分けて実行して,最後に実行結果のシートを1個にまとめる。 ・PCのスペックを上げる。メモリ増設。 >メモリ不足 具体的にどういう状態になりますか?画面上にはどんな表示が出ますか?

tyyyu2005さんのコメント
ご回答ありがとうございます。 >メモリ不足 >具体的にどういう状態になりますか?画面上にはどんな表示が出ますか? 画面のメッセージまでは完全に覚えていませんが、会社のPCメモリ8ギガでメモリ不足ですとの表示でした。 自宅のPCメモリ16ギガで最後まで走りました。 なので物理的な問題だったのだと思います。 >シートを分割する はい 自分もこの方法で考えていました。 >画像のサイズをあらかじめ一括して縮小処理 なるほどこれは思いつきませんでした。 明日にでも試させて頂きます。 非常に勉強になりました。ありがとうございました。

質問者から

lang_and_engineさん
メモリ不足解消のため挿入する画像が大変大きいため、予め画像加工ツールでリサイズしコンパクトにする事に致しました。
今度はエクセルに画像を加工する際、そのままの大きさで挿入をしたいと思います。
挿入した画像の高さに合わせて、セルの高さを自動調整(上下余白2m程度)したいのですが未熟なばかりにうまく行きません。
ちなみに参考にしたのが(http://q.hatena.ne.jp/1384181723)です。
参照urlは選択した画像の高さに合わせてセルの高さを調整(上下余白2m程度)するマクロです。
素人考えの思いつきで出来るのかなと考えてしまいました。
実際どうなのでしょうか。


関連質問

●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ