[[20240420121948]]　『シート上に画像ファイルをD&Dで読み込む』（ますお）　ページの最後に飛ぶ

『シート上に画像ファイルをD&Dで読み込む』（ますお）

ExcelのVBAを利用して
Excelのシート上に画像ファイルをD&Dで読み込む事はできますか　？

合わせて、現在は、手動で画像を読み込ませて
Const JPG as String = "画像"
としてその後の処理を行うので
D&Dで読み込ませたファイル名で "画像"の部分も変更もしたいです。

＜使用 Excel：Excel2021、使用 OS：Windows11 ＞

 一旦ワードにドラッグ＆ドロップして、ワードに貼りついた
 画像をエクセルのシートにドラッグ＆ドロップで貼付け、
 ということは可能です。

 LsitVewコントロールなどを使う、という方法もあります。
 いずれにせよ、ここの掲示板でたまに見られる質問なので
 探したら過去ログがヒットすると思います。
（OK） 2024/04/20(土) 13:01:02

ありがとう。

ネットを探して希望に近い記事を見つけました。

【みんなのVBA】実践　エクセルに写真をドラッグアンドドロップで挿入

https://mirai-brick.net/【みんなのvba】実践%E3%80%80エクセルに写真をドラッグ/

記事を読み解いてD&Dで画像は挿入できました。

もう一つ、

D&Dで読み込んだ画像を
Const JPG as String = "画像"
としてその後の処理を行うので
D&Dで読み込ませたファイル名で "画像"に変更したいのですがコードのどこを修正すれば良いですか？
（ますお） 2024/04/20(土) 13:28:15

お騒がせしましたが、自力でコードを追加して解決しました。

myShape.Name = "画像"
（ますお） 2024/04/20(土) 15:26:45

コメント返信：