• 締切済み

エクセルで画像を配置するにあたって

エクセル97で画像を配置するにあたって問題に直面しています。 教えてください。 エクセルのVBAにて、ある決められた場所(フォルダ)に保存されている画像(JPEG) をエクセルに貼り付けたいと考えているのですが、貼り付ける位置を セル単位等ではなく、詳細な位置(X軸、Y軸)を指定し、且つ画像のサイズも 指定(拡大・縮小)して貼り付けたいと考えているのですが、そのようなこと可能でしょうか? エクセル自体が位置情報をもっているのでしょうか? 可能でしたらサンプルのVBAを提示していただけましたら幸いです。 参考になるHPでも構いませんので、どなたかご教授願えないでしょうか。 宜しくお願い致します

みんなの回答

  • taknt
  • ベストアンサー率19% (1556/7783)
回答No.1

Sub Macro1() Dim w_len As Long Dim h_len As Long Dim zoom_scal As Double Dim pic_file_name As String pic_file_name = "C:\My Documents\Image1.jpg" ActiveCell.Offset(0, -1).Select 'ひとつ左のセルを選択 w_len = Selection.Width '選択されたセルの幅を得る h_len = Selection.Height '同 高さを得る ActiveSheet.Pictures.Insert(pic_file_name).Select '図の挿入 zoom_scal = w_len / (Selection.ShapeRange.Width) '横からの拡大率を計算 If Selection.ShapeRange.Height * zoom_scal > h_len Then '高さがオーバーすれば高さで調整する zoom_scal = h_len / Selection.ShapeRange.Height Selection.ShapeRange.Height = Selection.ShapeRange.Height * zoom_scal Else Selection.ShapeRange.Width = Selection.ShapeRange.Width * zoom_scal End If End Sub リンク先のURLが変わった場合に備えて コピペです。 多分、これでいけるんじゃないかと思いますが。

参考URL:
http://www.ae.wakwak.com/cgi-bin/sbox/~efc21/wwwlng.cgi?print+200102/01020291.txt
tomoyui
質問者

お礼

お礼が大変遅れました。申し訳ありません。 質問の仕方が悪かったようなので、 再度質問しなおしたいと思います。 お手数をおかけ致しました

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • 複数の画像を配置してリンクさせるには?

    予め準備した画像(JPEG等)を、ピクセル単位で自由に配置させ、それぞれの画像にリンクを設定したいと思っています。 一枚画像でのホットスポットも考えたのですが、数が多いのであきらめました。 理想は、画像ファイル名とリンク先と位置データ(X,Y)を予めデータベースに用意しておき、PHPのループ処理で配置することができればいいと思っています。 これが可能であれば、具体的にどのような処理を行えばいいのでしょうか? また、他の方法がありましたら、教えていただければ幸いです。 宜しくお願いします。

    • 締切済み
    • PHP
  • エクセル97での位置情報取得について

    エクセル97での位置情報の取得について 再度質問させていただきます エクセルのVBAにて、セルを無視したシート内の位置情報を 取得することは可能でしょうか? たとえば一番左上を(0,0)とすると(50,100)などの X軸、Y軸の数字の取得です。 あるA画像をX軸50 Y軸100の位置に挿入して、   B画像をX軸50 Y軸150の位置に挿入して、   C画像をX軸50 Y軸200の位置に挿入したいと考えています。 画像を挿入した後の位置情報の取得ではなく、位置情報を指定してから その場所に画像を挿入したいと考えています。 そのようなことは可能でしょうか? セルを無視したワークシート上のX軸、Y軸の 位置情報の取得の仕方を教え下さい。 参考のURLでも構いません。宜しくお願い致します。

  • Excelにjpeg画像を配置したいのですが

    初歩な質問ですいません。Excelにjpeg画像を配置しようとしたら、赤い×の画像になってしまいます。なぜなんでしょうか? (Mac OS 10.2 Excel X for mac)

  • EXCEL97での位置情報取得に

    エクセル97での位置情報の取得について エクセルのVBAにて、セルを無視したシート内の位置情報を 取得することは可能でしょうか? たとえば一番左上を(0,0)とすると(50,100)などの X軸、Y軸の数字の取得です。 あるA画像をX軸50 Y軸100の位置に挿入して、   B画像をX軸50 Y軸150の位置に挿入して、   C画像をX軸50 Y軸200の位置に挿入したいと考えています。 そのようなことは可能でしょうか? セルを無視した位置情報の取得の仕方を教え下さい。 参考のURLでも構いません。宜しくお願い致します。

  • Illustratorで画像を配置する方法

    Illustrator初心者です。 Illustratorに写真や画像を配置した時に縮小するのはよくないと聞きました。 小さくするなら最初に写真そのものを小さくしてから配置しないといけないとか。 常に100%のサイズで配置しないといけないとの事ですが、どうしてでしょう? 写真を拡大するのが良くないのはわかりますが、どうして縮小もいけないのでしょう? どこかで不具合がでるのでしょうか? よろしくお願いします。

  • フォトショップでの画像配置の際の解像度について

    フォトショップにて作成していたキャンバスに配置にて画像を取り込む際、拡大縮小すると解像度も変わるのでしょうか。 元キャンバス(350pdi)に配置画像(600dpi)を拡大し統合したところ、350dpiの画像が出来ましたが、これは元々600dpiであった配置画像も解像度が600dpiから350dpiに変わったということで良いのでしょうか。 また、元キャンバスがたとえば600dpiだった場合、配置画像(同じく600dpi)を拡大しても600dpi、縮小しても600dpiとなり、配置ではあくまで元キャンバスの解像度に影響され、拡大縮小をしても配置画像自体は解像度は影響されない(つまり画像自体が600dpi以上にも以下にもならない)ということでよろしいでしょうか。 ふつう画像を拡大縮小するとそれにより解像度も変わると思うのですが、フォトショップでは解像度を変えずに拡大縮小をできると認識していいのでしょうか。 初歩的な質問ですみません、 現在フライヤーを作っているのですが、印刷所のテンプレートと配置画像の大きさが一致せず、フォトショップで拡大縮小編集をしようと思っています。綺麗に印刷できればと思い調べてみたのですがわからず、質問させていただきました。 よろしくお願いいたします。

  • イラストレーターで「配置した画像の拡大・縮小・回転はできるだけ避けてく

    イラストレーターで「配置した画像の拡大・縮小・回転はできるだけ避けてください」はなぜ? イラストレーター初心者です。 チラシの印刷データを印刷会社へ入稿しようとしています。 写真画像をフォトショップでEPS保存してイラストレーターのテンプレートに配置しています。 入稿の注意事項に、イラストレーターで「配置した画像の拡大・縮小・回転はできるだけ避けてください」という文言がありました。 拡大・縮小は画像が荒れそうな気がするので避けるのはわかるのですが、回転はなぜだめなのでしょうか?

  • 印刷物を作るときの画像配置について

    今某商社様のお中元用チラシを作成しております。 そこでふと疑問に思ったのですが・・・。 通常、私は背景や、写真などの画像を印刷物に配置する場合、 photoshopで実際に使う画像の大きさで350くらいの解像度で作成してからイラストレーターに配置します。 ところが、参考として渡された昨年のデータをみてみると、 どうやら大きいままイラストレーターに配置して、イラストレーター上で大きさを変えているようなのです。 リンクパレットで該当画像をクリックしてみると「変形」という項目のところが「拡大・縮小」(縦/横)(6%,6%)とかになっています。 私の作成したデータだと、実際の大きさに加工してから配置しているので、ここはもちろん(100%,100%)なっています。 当然といえば当然ですが、モニタで見たときや拡大したときは参考としてわたされたデータの画像のほうがきれいに見えます。 今まで私のやり方が正しいものとばかり思っていたので、モニタで拡大したときなど、自分の作成したデータに配置されている画像が粗くなっているのを見ると、実際に印刷されたときはどっちがきれいなのだろうと、不安になってきました。 文章がへたくそで申し訳ないのですが、実際の画像配置で正しい方法はどちらでしょうか? また、モニタでみていて拡大したら、あらくなっても、実際に使う大きさで350ほどの解像度があれば、問題なくキレイに印刷されるのでしょうか? よろしくお願いします。

  • エクセルに貼り付けてある画像

    エクセルに画像が貼り付けてあるのですが、 (図の挿入かもしれませんが、エクセルファイルを作った過程 等はわかりません。元の画像が、ビットマップなのか、GIFなのか 等の情報もありません。) その図をエクセルファイル内でマウスで拡大、縮小をした場合には それほど目だってぼやける事はないのですが、 コピーを行い、イラストレータやペイントに貼り付けて、拡大、縮小を 行うとかなり画像がぼやけてしまいます。 これは一体何故なのでしょうか? また、綺麗なままコピーはできないのでしょうか?

  • エクセル2010 表の体裁について

    よろしくお願いします。 エクセル2010で表を作っています。似たような表を作っているのですが、県庁所在地別の人口数) グラフの軸の単位(下の図で(人)とか(%)とか))これをどのグラフでも同じ位置に表示させたいのですが、目検以外にやり方があるのでしょうか? パワーポイントみたいに位置を指定したりと、【右に合わせる】とかレイアウトを一括でそろえられればと思うのですがそのようなやり方はあるのでしょうか・ 教えていただければと思います。 また、エクセル表のY軸で第一軸のみを表示させているとき、左側に単位が表示されず、右側に単位が表示されることがあります。 (千人) 1 | 2 | 3 | 4 | 5 |______________________________________   10 20 30 40 50 (年) としたいのに                 | 1                 | 2                 | 3                 | 4 ________________________________ | 5 と表示されてしまい、もう一度データを選択しなおして表を作り直すと治るのですが、 フォントなどもう一度修正しなおさないといけなくて面倒くさく。 Y軸の単位の表示位置を変えることはできるのでしょうか・ 教えてください。よろしくお願いします。 よろしくお願いします。

専門家に質問してみよう