【Excel】画像を挿入するマクロ

シートに画像を挿入するマクロです。

Pictures.Insert [ファイル名]

例

まず、シートにボタンを１個配置します。
ボタンはメニューの［挿入］から図形の「角丸四角形」を貼り付けています。



そして、マクロの登録で「button1_Click()」というイベントハンドラを作り、下記のように記述します。

Sub button1_Click()

    Range("C7").Select
    
    ActiveSheet.Pictures.Insert "C:\work\Excel\neko01.jpg"
    
End Sub

ボタンを押すとこのようにアクティブセルの左上隅に画像の左上隅が一致するように画像が挿入されます。

スポンサーリンク

https://hosopro.blogspot.com/2017/05/excel-vba-picture-insert.html 【Excel】画像を挿入するマクロ