- ベストアンサー
エクセル 写真挿入
こんなマクロを組み込みたいのですが、どなたか教えてください。 ＯＳはＸＰ エクセル２０００です。 １．質問 Ｘというフォルダにある写真全てを次のように貼り付けたいです。 Ａ１に写真のある場所先（写真ファイル名） Ａ２にその写真。サイズは元サイズの３０％。 Ａ３にＸというフォルダにある２枚目の写真 Ａ４ににその写真。サイズは元サイズの３０％。 Ａ５にＸというフォルダにある３枚目の写真 Ａ６ににその写真。サイズは元サイズの３０％。 こんな流れでＸというフォルダの写真すべてを シートに貼り付けるマクロを教えてください。 ２．現状 挿入→図→サイズ変更 の繰り返しで、かなり時間が かかってしまっています。 宜しくお願いいたします。
- yamada_tarou
- お礼率65% (124/188)
- オフィス系ソフト
- 回答数2
- ありがとう数2
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
こういうのはエクセルVBAでも上級の課題で、課題のまる投げになっている。自分でWEB照会でもして、勉強して行くしかない。 ーー http://oshiete1.goo.ne.jp/qa2091001.html の＃５と、そこで紹介しているWEB記事を参考に、勉強し疑問点を絞って再質問したらどうですか。 ーー 課題は A.指定フォルダのファイル名を全て（または条件付で）知る方法 （＝コード） B.図のシートへの挿入の方法 C.サイズ、位置あわせの方法 D.連続処理の流れのコントロールの方法 を勉強することです。 ーーーー ＞サイズは元サイズの３０％ 上の私の回答では絶対的な値を指定しているが、これはどうしたらよいか判らないな。 セルの幅は手動かVBAで設定し、それに合わせるなら ○.Width=Cells(i,j).Width のようにする。
その他の回答 (1)
- marbin
- ベストアンサー率27% (636/2290)
Dir関数でフォルダ内のファイルを取得できます。 Dir関数の参考サイトです。 ループでファイルを取得します。 拡張子の指定も可能です。 http://www.officetanaka.net/excel/vba/file/file07.htm 画像の貼付け、サイズ変更はマクロの自動記録が参考になる と思います。 とりあえず、ファイル一覧の取得、画像の貼付け、貼り付けた 画像のサイズ変更を出来るようにしてみてください。 それぞれが出来たら、これを組み合わせて１連の作業で出来る ようにしましょう。
お礼
回答有り難うございます。 参考にさせていただきます。
関連するQ&A
- Ｅxcel 2000での挿入
図の挿入でファイルに入れてある幾つかの写真をエクセル シ－トに入れたのですが、サイズが大きすぎていちいち変更しなくては成らない為、一定のサイズに指定できないのでしょうか？ 挿入した図の書式設定で固定にしたのですが、他の写真を挿入 したら元のサイズに戻ってしまいました。是非お教えください。
- 締切済み
- その他(ソフトウェア)
- エクセルで挿入した写真が×印になってしまう
エクセルで写真帳を作成しているのですが、 「図」ツールバーの「図をファイルから挿入」を使って写真を8枚挿入しました。 するとそのうちの2枚が、真ん中に赤い大きなバツ印の入った四角になってしまいます。一旦それを削除してもう一度やりなおしても同じ結果になります。 ただ、その×印の図を残したまま同じ図をもう一枚挿入すると、 正しく表示されます。しかもスクロールして×印の図が見えなくなってから またスクロールすると、普通の写真に戻っています。 そして、1枚目（表示が元に戻った写真）を削除すると、今度は2枚目 （正しく表示されていた写真）が×印になります。 今のところは、余分な写真を印刷範囲外に置いて印刷しているのですが、 できるならばなおしたいのです。 使用しているものはWindows98、エクセル97です。 写真のファイルサイズは100KB前後のものです。 写真ファイルが壊れているというような風には見えません。 挿入した2枚の写真のプロパティで違っている点があるのですが、 見た目は全く同じ大きさなのに、正常に表示されている写真の倍率が 縦横86％なのに対して、×印の図では高さ346％、幅460％になっています。 エクセルファイルのサイズは1MB弱ですが、他のエクセルファイルで もっとたくさん写真を挿入して、サイズも大きいファイルなどでは エラーは出ていません。 いろいろ調べてみたのですが、わかりませんでした…。 ご存知のかた、よろしくお願いします。
- 締切済み
- オフィス系ソフト
- Word VBA 写真 挿入
Excel で写真の挿入VBAは 皆さんのご回答を元になんとか出来ました。 回答者さま 有難う御座いました。 挿入したファイル（写真）のサイズ変更（見た目のサイズ)も出来ます。 ところが、 Wordへの写真挿入 サイズの変更 になりますと、(VBAで記述したいのに) 「図の書式設定」自体効きません。 ↑ 「マクロの記録」をしても、出来ません。 （ボタンは False 状態） 「マクロの記録」で出来ないという事は つまり、Wordでは無理って考えれば良いのでしょうか。
- ベストアンサー
- オフィス系ソフト
- エクセルの画像について
エクセルに写真の画像を貼り付けようとしていますが、サイズが上手くいきません。 元の写真のサイズは300KBあり、それを圧縮して30KBまで落としました。 （圧縮はマイクロソフトオフィスピクチャーマネージャーでしています） エクセルに図をファイルから挿入→図選択で2枚（同じサイズ）を挿入しました。 そして、後は写真を挿入する事なく普通にエクセルの表や文字等を打ったものを作り保存したところ、 サイズが17MBになってしまいます。 写真のサイズを落としたのにエクセルのシートのサイズが大きくなり過ぎで開くのに時間がかかってしまいます。 どうして30KBの写真を2枚貼り付けただけでこのような大きなサイズになってしまうのでしょうか。 何方か解決方法知っておられる方がおられましたら、お願い致します。
- 締切済み
- オフィス系ソフト
- エクセルでの図の挿入
こんにちは、エクセルにA4サイズの図を挿入したいのですが、うまくいきません。ワードもしくは、スキャナから取り込んだ図を挿入、貼り付けしてもサイズが狂います。仕方のないことなのでしょうか？ オフィス2000を使っています。どなたか教えてください。
- 締切済み
- オフィス系ソフト
- エクセルのマクロであるフォルダ内にある全エクセルファイルのシート1！（
エクセルのマクロであるフォルダ内にある全エクセルファイルのシート1！（A1：X365）の値を取得し、コピー元のエクセルファイル名のシートに貼付ける方法を教えて頂けないでしょうか？できればコピー元のエクセルファイルは開かずに実行させたいです。エクセルは2003を使っています。
- ベストアンサー
- Visual Basic
- エクセルの写真挿入時に「図の挿入」から挿入しています。 その際、元の写
エクセルの写真挿入時に「図の挿入」から挿入しています。 その際、元の写真データのピクセル数に関係なく自分が指定した大きさに設定し自動縮小や拡大して挿入する方法を教えてくだ
- ベストアンサー
- オフィス系ソフト
- Excelマクロで、多数のシートの値だけを元のファイルに上書きするようなマクロを教えていただきたいのですが。
あまり詳しくないのですが、Excelマクロで、１つのファイルにある４０くらいのシートの計算式等をすべて排除した値＆図だけを元のファイルに上書きするようなマクロを教えていただきたいのですが。 マクロを使わないでの方法は、 (1)、シート選択 (2)、CTRL＋Ａ（すべて選択） (3)、CTRL＋Ｃ（コピー） (4)、形式を選択して貼り付け (5)、値（選択値） これをそのファイルが持っているシート分の繰り返しです。 宜しくお願いします。
- ベストアンサー
- Visual Basic
- エクセルで写真を挿入する方法を教えて下さい。
エクセル２００３でデスクトップのフォルダーに保存してある写真を貼り付ける方法を教えて下さい。 今までは写真を右クリックで「コピー」を選択してエクセルで右クリックで「貼り付け」を選択すればよかったのですが、それが出来なくなりました？ エクセル上で「挿入」からデスクトップのフォルダーに保存してある写真を選択して挿入という方法があると思います。 宜しくお願い致します。
- ベストアンサー
- オフィス系ソフト
お礼
回答有り難うございます。 質問を絞って再質問さて頂きます。