![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
VBAの初心者です。
エクセルに写真データを貼り付けるVBAで、以下のマクロを実行するとシートの同じセル位置B5に、写真が2枚重なった状態となります。
セルのB5とH5の位置に写真をそれぞれ貼りつけるために、どのように修正すればよいのでしょうか?ご教授ください。
OS:Vista ソフト:Excel2007
Sub 写真ファイル呼び出し()
' Sheets("風景1").Select
Range("B5").Select
ActiveSheet.Pictures.Insert(Worksheets("風景写真").Range("o4").Value).Select
With Selection
Selection.ShapeRange.LockAspectRatio = msoTrue '縦横比を固定するコマンド
Selection.ShapeRange.Width = 245 '縦横比固定、幅のみを指定する
End With
'Sheets("風景2").Select
Range("H5").Select
ActiveSheet.Pictures.Insert(Worksheets("風景写真").Range("o5").Value).Select
With Selection
Selection.ShapeRange.LockAspectRatio = msoTrue '縦横比を固定するコマンド
Selection.ShapeRange.Width = 245 '縦横比固定、幅のみを指定する
End With
End Sub
No.1ベストアンサー
- 回答日時:
下記のように変更してみてください。
With Selection
.Left = Range("B5").Left
.Top = Range("B5").Top
.ShapeRange.LockAspectRatio = msoTrue '縦横比を固定するコマンド
.ShapeRange.Width = 245 '縦横比固定、幅のみを指定する
End With
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 【VBA】写真の貼り付けコードがうまく機能しません。 5 2022/09/01 18:43
- Visual Basic(VBA) マクロで最終行を取得してコピーしたい 3 2022/04/06 19:07
- Visual Basic(VBA) 【VBA】写真の縦横比を変えずに貼り付ける 5 2023/06/13 11:42
- Visual Basic(VBA) データのある範囲を選択するVBAについて 2 2022/09/03 00:20
- Visual Basic(VBA) エクセル VBAについて 2 2022/05/16 16:33
- Visual Basic(VBA) 複数セルに〇印をつけるマクロ 4 2022/09/07 05:33
- Visual Basic(VBA) excel2021で実行できないマクロ。どこを直したらいいのか 2 2022/03/28 03:40
- Visual Basic(VBA) エクセルのマクロを使ってメールを送る方法について教えてください 2 2022/03/29 01:36
- Visual Basic(VBA) 3つのプロシージャをまとめたら実行時エラー発生で対応不能 6 2022/05/17 01:47
- Excel(エクセル) 【マクロ】スクショ印刷がうまく動かない件 5 2022/12/06 17:37
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
IFとIFS関数
-
Excelを無料で使うには? パソ...
-
セルの数を求めたい
-
エクセルの数式バーのフォント...
-
Excelの表示についての質問
-
再質問です。マクロの修正箇所...
-
データチェックを行うエクセル...
-
Excelに詳しい方! B列が「日...
-
西暦や和暦の表示をyyyymmdd表...
-
Excelで50個のセルに同じ文字を...
-
Excelの数式について教えてくだ...
-
Excel VBAで全ての矢印を赤色に...
-
エクセル関数を使って
-
祝日と土曜、日曜の合計をカウ...
-
xlsxファイルを保存する際にPDF...
-
Excelについて
-
エクセルVBA、別ブックへ転記す...
-
エクセルで「ページレイアウト...
-
2列に入っているデータを1列...
-
【ExcelVBA】名前を付けて保存→...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
寒空の下 さむぞらのした?もと...
-
「太陽の下」の読み
-
10の0.6乗 10の1.0乗 10の1.2乗...
-
逆関数では、何故例2の様にもと...
-
もと資料
-
2160x1920の縦横比?
-
言葉について質問です。 縦横等...
-
「もとい」のナチュラルで正し...
-
wmvをvlc media player でmp4に...
-
人名の読みを教えてください
-
中学受験 割合の問題です
-
[本下] 苗字です 何読みますか?
-
もと、おおもと、ねもと、こん...
-
デスクトップパソコンのスリム...
-
質問です 心もとないって言葉の...
-
情報の正確性に優れた生成AIは...
-
最近のiPhoneって全然かわいく...
-
Mac Book 編集した画像をもとに...
-
もとが持ってる方いますか?
-
「もとより」の使い方について ...
おすすめ情報