[[20240129153518]]　『「リンクされた図」として貼り付けられたシート内』（す）　ページの最後に飛ぶ

『「リンクされた図」として貼り付けられたシート内部全て画像のリンク先を同一ブックの別シートに更新したい』（す）

Excelマクロについて質問です
ブック内にあるすべてのシート内にあるすべての画像に対して、リンクが設定されているかを確認し、もし設定されていたらそのリンク先の情報から特定の文字列を見つけたらその値を変換し、同一ブック内の同一範囲を再設定するというマクロをAIなどを利用して作ってみましたが、for each pic in ws.shapesの行からの繰り返しが一回しか発動しません
シート内の全ての画像に対してやって欲しいのに動かないのですがどうすればよろしいですか？

＜使用 Excel：Microsoft365、使用 OS：Windows10 ＞

 シートも見えませんし、コードの全容も分かりませんので、
 前提条件が合っているのかを疑います。

 For Each ・・・の次行に、
 Debug.Print "[ws.name]";ws.Name;"[pic]";pic.Name
 を追加し、イミディエイトウィンドウで確認してください。

 同じシート名が複数出力したら、その回数分ループしています。

（tkit） 2024/01/29(月) 16:01:23

コメント返信：

[ 一覧(最新更新順) ]

[[20240129153518]] 『「リンクされた図」として貼り付けられたシート内』（す） ページの最後に飛ぶ

[[20240129153518]]　『「リンクされた図」として貼り付けられたシート内』（す）　ページの最後に飛ぶ