• 締切済み

「エクセルのシートに決まったサイズの画像を貼り付けたい」

「エクセルのシートに決まったサイズの画像を貼り付けたい」 http://okwave.jp/qa/q1182506.html こちらの質問を見つけ試してみたのですが、うまくいきませんでした。 縦横比を固定にせず、8.76cm×12.01cmという決まったサイズで画像を貼り付けたいです。 また、この方法だと先にセルの大きさを調整するようなのですが、セルの大きさの設定はこのように細かいサイズでできるのでしょうか? マクロというものをいじったことがないので、ほとほと困っております。 助言をお願いいたします。

みんなの回答

  • MackyNo1
  • ベストアンサー率53% (1521/2850)
回答No.1

全体的に何をしたいのかわからないところがありますが、単純に挿入した図形のサイズを縦横比を固定せずに8.76cm×12.01cmのようにしたいなら、対象の図形を選択して以下のマクロコードを実行すれば良いと思うのですが・・・・ Selection.ShapeRange.Height = 248.25 Selection.ShapeRange.Width = 340.5

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

関連するQ&A

  • エクセルに画像を貼り付けるとセルにあわせたサイズにしかならず、大きさ調整すると形が変わってしまう

    エクセルシートにJPG形式の画像を貼り付けるのですが「挿入」-「ファイルから選択」でとりあえず配置した後、希望の大きさにマウスで調整しようとするのですが、セルにあわせたサイズにしかならず、画像の右下のハンドルでドラッグしても、元の形と変形してしまいます。 元通りの縦横比で貼り付けるにはどうすればいいのでしょうか。 画像の書式プロパティーを見ても縦横比を固定するにチェックが入っているのに数式バーのところに**%X**%と表示され、どんどん縦横比が変わってしまいます。 以前はちゃんとできており、また以前に作成したファイルを開いていじってみてもちゃんと縦横比固定されたまま変形できます。 急におかしくなってしまいました。しいて以前との違いをあげるとすると以前は大文字のJPG拡張子がついてた画像を貼り付けてたのを今回はなぜか小文字のjpg 拡張子になってる画像を貼り付けようとしているくらいでしょうか。 ちなみにエクセルは2003です

  • 画像添付のサイズを教えてください

    こんにちは。 教えて!gooから登録しています。 画像添付のサイズに関して二点ほどの質問です。 http://okwave.jp/qa/q7054866.html こちらで良さそうですが、現在の適切なサイズは変わっているのかどうか。 もう一点はプロフィール画像に関してです。 どれぐらいが適切なサイズになるのでしょう? 正方形で縦横は同じ数値で良いと思われます・・・!? 容量に関しては、理解しています。Excelで作成して必要ならJTrimで調整しようと思っています。 Excelの高さ・幅 cmで教えていただければ有り難いですが、ピクセルでも構いません。 各サイズについて分かる方、宜しくお願いします。

  • マクロの画像サイズについてお聞きしたいのです。

    マクロの画像サイズについてお聞きしたいのです。 マクロの記録で画像を縦横比を固定するで高さを4.23cmに設定したら、 横が5.64cmになり、下のようなのマクロの値になりました。 そこで質問なのですが、画像の1辺(高さ)を4.23cm(約120pt)に定めると もう一辺が縦横比の固定で自動的に定まるマクロは作れますか? 表に入る大きさが高さが基準で、いろんなサイズでテストしてみた結果、 サイズ違いの画像ができてしまう時があります。 識者の方、よろしくお願いします。 【↓今作成中マクロの一部】 With Selection.ShapeRange .LockAspectRatio = msoTrue .Height = 120# .Width = 159.75 .Rotation = 0# Selection.Cut ActiveSheet.PasteSpecial Format:="図 (JPEG)", Link:=False, DisplayAsIcon:= _ False Range("A5").Select End With

  • 画像サイズを変更するマクロ

    Excelで、アクティブシート内の画像(msoPicture)全てを、縦横比を保持したまま一括で縮小するマクロはありますでしょうか? 元のサイズは、 高さ:12.7cm、幅:16.93cm 変更後のサイズは 高さ:6.82cm、幅:10.12cm (高さの倍率81%、幅の倍率76% です) 説明に不足がありましたら、お手数ですがご指摘頂けますと幸いです。 よろしくお願いいたします。

  • 画像を結合セルの大きさで貼付(以前に回答されたマクロについて)

    以前、下記ページで回答(公開)されていたマクロについてなのですが、 私に一番あっているので使わせて頂きたいと思っています。 http://oshiete.homes.jp/qa2300268.html その中で、貼付画像サイズが「縦横比維持」に設定されています。 画像を選択した結合セルの大きさで貼付るには、どこを、どのように修正すればいいのでしょうか? 宜しくお願い致します。m(_ _)m

  • 画像をマクロでエクセルシートに貼り付けるには

    画像をマクロを使ってエクセルシートに貼り付けようとしています。 2つ質問があります。 下記のマクロをベースとして。 (1)画像の縦横比を固定のまま、貼り付けたい。LockPictureAspectRatio=msoTrueだろうと思うのですが、見つかりません。    LockPictureAspectRatioは、画像のバケツボタンの fill effect/picture/select picture/insert/ から来ています。 (2)位置をセルを選んで与えたい。つまり、Cell(10,10) --> pointへの変換方法を教えて下さい。    下のマクロでは、x=100,y=100と与えていますが、これを、セルを選ぶことで与えたいのです。 Sub myMacro() Dim myPicture As String Dim a As Object myPicture = "C:\Documents and Settings\nrjito\My Documents\My Pictures\test.jpg" Set a = ActiveSheet.Shapes.AddShape(msoShapeRectangle, 100, 100, 300, 300) a.Fill.ForeColor.RGB = RGB(255, 255, 255) a.Fill.Transparency = 0 a.LockAspectRatio = msoTrue a.Fill.UserPicture myPicture End Sub よろしくお願い致します。

  • エクセル文字サイズ変更を他のシートに参照させるには

    http://okwave.jp/qa/q6527922.html 過去にこのような質問からエクセルで顧客毎の単価一覧と、納品、納品(控)、請求、と、 シートをコピーして作りました。 で、シート2で納品書を作りその入力内容が納品(控){シート3} 請求{シート4}に 自動で入力するように参照させています。 顧客名の中に、名前が少し長くセルに収まらない時があるので シート2の納品書でそのセルの文字のサイズを小さく変更したんです。 しかし、納品(控){シート3}と請求{シート4}は、文字のサイズが変わらず そのままなんです。 シート3、シート4も同じように同時に文字のサイズが変わるようにするには どうすればいいのでしょうか? よろしくお願いします。

  • 写真編集後の縦横比とプリントサイズ

    写真編集後の縦横比とプリントサイズ 先ほど以下の質問をしたものです。 http://okwave.jp/qa/q6078151.html サイズはそのままで写真を上下に連結して、6000×4000サイズの画像ができあがりました。 もともとはデジカメの写真で縦横比が4:3だったのですが、編集後3:2(2:3?)になっていますよね…? この場合、注文するのはL判とDSC、どちらがベストでしょうか。 おそらくL判ではないかと思いますが、如何でしょうか? また、縦長と横長はプリント注文する際にどちらでも差し支えありませんか?

  • エクセル) 複数の画像を同時に挿入するマクロについて

    仕事上、エクセルに画像を挿入することが多く、場合によって200枚の画像を挿入することがあります。 なんとかならないかとWebで調べたら下記のサイトに行き着きました。 http://pc.nikkeibp.co.jp/article/NPC/20071101/286186/?P=1 このマクロを半信半疑に実行したら、見事に"picuture"というシートにズラーーーっと画像がいっきに挿入されました。 スゴイ!!まさに神みたいなマクロでした。 ただ、数箇所「うーーん・・。」という点があります。 1)■■挿入した各画像の大きさの『縦x横 比』■■ 挿入した全ての画像の"横"の大きさは「セル2個分」にフィットしています。 これはいいの全然いいです。バッチリです。 問題はそれに対する縦です。縦横比を保持しないで縦の大きさが6セル分に無理矢理フィットします。 つまり強引に横2セルx縦6セルの画像になってしまいます。 縦横比を保持できないでしょうか? ちうなみに貼り付ける画像は全て正方形よりやや横長です。。 2)■■挿入した画像がハイパーリンクになってる。■■ 挿入した画像の位置を微妙に変えようと、白い十字キーのポインターを画像の上に持っていくと、IEでリンク先をクリックするときに出てくる「白い手袋をした人差し指を立てたポインター」に変わります。 これだと画像が選択できません。 以上この2点どなたかマクロに詳しい方がいらっしゃいましたら解決していただけますでしょうか? 回答下さった方には心底お礼したいです!!お願い致します。 お願いします!

  • エクセルで同じ大きさの画像だけを並び替えるマクロ

    仕事でエクセルのシートに600枚ほどの写真画像を並べる作業をしなければなりません。 画像のサイズは2種類あり、  ・大きなサイズの画像(高さ5.73cm、幅7.51cm)が2枚、  ・小さなサイズの画像(高さ4.31cm、幅5.77cm)約50枚(以下n枚とします) を1つのsheetに配置します。 このとき、大きなサイズの画像はシートの右上に並べ、小さなサイズの画像は横4枚×縦(n/4)+1列に並べなければなりません。シート上での配置のイメージは下のような感じです。 ●:大きなサイズの画像 ☆:小さなサイズの画像 --:シートの範囲だと思ってください -----------------------------                  ●● ☆     ☆     ☆     ☆ ☆     ☆     ☆     ☆ ☆     ☆     ☆     ☆ ☆     ☆     ☆     ☆ ・ ・(途中省略) ・ ☆     ☆     ☆     ☆ ----------------------------- シート右上に配置されてある大きなサイズの画像配置を変更せずに、小さなサイズの画像のみを選択して横4枚の格子状に並べるにはどのようなマクロを組めばよいでしょうか? 過去の質問QNo.3864319を参考にしましたが、この方法では同じサイズの画像すべてを並べ替えているように設定されてあります。したがって、このマクロを実行すると、位置を変えたくない大きなサイズの画像も含めて格子状に並べ替えられてしまうため、困っています。並べ替えをしなければならない画像は3000枚くらいになると思われるので、このマクロを完成させてしまわないと作業が締め切りに間に合わないのでとっても困っています。 どうかよろしくお願いいたします。

専門家に質問してみよう