• 締切済み

マクロで画像挿入→エラー「リンクされたイメージを表

picopico_7の回答

回答No.3

こんにちは。 画像の表示までは上手くいかれたみたいで良かったです。 #1,2のmitarashiさんが書かれている通りAddpictureを使われると効率的かと思い私の方でも試してみました。 が、写真サイズの設定だけがなぜだか上手くいきませんでした(私の知識不足です)。 なので今使われているプログラムに入れた状態で記しておきます。 コピペして写真の保存場所を直してから動かしてみてください。 (ちなみに追加した部分は「'リンク貼付画像を切り取る」「'写真ファイル名が入力されているセルから2つ左のセルを選択」「'画像をExcelシート自体に貼付」のみです) Sub macro1() Dim p As String Dim h As Range '写真の保存場所 p = "C:\Users\☆☆☆\Documents\picpic\" '現在表示されている写真は一度削除 ActiveSheet.Pictures.Delete '商品名が入力されている行まで繰り返す For Each h In Range("D2:D" & Range("C1048576").End(xlUp).Row) '写真ファイルが保存されている時 If Dir(p & h) <> "" Then With ActiveSheet.Pictures.Insert(p & h) '写真ファイル名が入力されているセルから2つ左のセルに挿入 .Top = h.Offset(0, -2).Top .Left = h.Offset(0, -2).Left '写真サイズの設定 .Width = h.Offset(0, 1).Width .Height = h.Offset(0, 1).Height 'リンク貼付画像を切り取る .Cut End With '写真ファイル名が入力されているセルから2つ左のセルを選択 h.Offset(0, -2).Activate '画像をExcelシート自体に貼付 ActiveSheet.PasteSpecial Format:="図 (JPEG)", Link:=False, DisplayAsIcon:=False End If Next End Sub

関連するQ&A

  • マクロを使って画像を貼り付け

    VLOOKUPで画像を貼り付けしようと検索してましたが 自分のやりたいことをしようとすると、どうもマクロで設定したほうが いいとわかりましたが、なかなか自分のイメージに近い参考URLがなく ここに質問します。 まず、自分のやりたいイメージですが・・・ 同じフォルダー内に画像を貼り付けしたいエクセルと画像フォルダーを一緒に置きます。 候補(1)エクセルの指定した場所に(9か所)一気に画像フォルダーから貼り付け。 候補(2)VLOOKUPみたいに数字を入力したら指定したセルに画像を貼り付け。 上記のことが可能でしょうか? もしくは、近い操作ができるのでしょうか? 以上、わかるかたのご教授お願いします。 尚、上から目線の回答はやめてもらいたいです。

  • 画像ファイルのリンクについて

    Microsoft Office Excel 2003に関する質問です。 Excelシートのセルに画像ファイルをリンクさせておいて、 セルをダブルクリックした際にリンクしている画像ファイルを 呼び出して表示させる、というような便利な機能がExcelに あったりしますか? もしご存じの方がおられましたら、教えて頂けると非常に 助かります。 #ちなみに、Excelの「リンクして貼り付け」の使用を試みましたが、 #画像ファイルをリンクして貼り付けることはできないようです。。

  • 画像を挿入してwordで名札を作りたい

    Excelでリストをつくり、wordに差し込み印刷をして名札を作りたいと思っています。名札には画像も挿入したいと考えています。 http://office-qa.com/Word/wd460.htm このサイトを参照してやっておりますが、「8画像枠を選択し「F9」キーを押して更新する」のところで、F9を押してもwordには「リンクされたイメージを表示できません」のエラーが出てしまいます。 元のリストと画像データは、デスクトップに置いた1つのフォルダaの中に「リスト(Excel)、フォルダb(中に画像を格納)」という状態で置いてあります。 wordの画像リンクは「file:///C:\Users\ユーザー名\Desktop\フォルダa名\フォルダb名\」になっております。 うまくいかないため、方法を教えていただけますでしょうか。 使用しているwordとExcelはそれぞれ2010です。 よろしくお願いいたします。

  • 商品画像リンク (image_link)とは何です

    商品画像リンク (image_link)とは何ですか? Googleショッピングに出店するために商品画像リンク (image_link)を提出しなければなりません。 商品画像リンク (image_link)とは何ですか? もしかして→<img src="http://brabra-star.lolipop.jp/1.jpg">これのimg src="から後ろの部分ですか? この部分のことですか?http://brabra-star.lolipop.jp/1.jpg 宜しくお願いします

  • Excelの画像のリンクは同一フォルダ内ですか?

    Excelで画像を貼り付ける場合、 画像データは、作成するExcelデータと同じフォルダ内に保存しないといけませんか? それとも、フォルダ内にExcelデータを置き、また画像フォルダを作り、そのフォルダに画像データを保存してもよいですか?つまり、Excelデータと画像データを同一フォルダ内に置かないという事です。 こういう感じです。⇒ フォルダ(Excelデータ、画像フォルダ(画像データ)) それとも⇒ フォルダ(Excelデータ、画像データ) にしなくてはいけないのか? 作ったデータをフォルダごとにまとめて、ある人へ提出しなくてはならないため、画像のリンクとかはどうなるのか心配で質問することにしました。

  • エクセルでリンクした画像を表示したいのですが、可能でしょうか?

    エクセルに画像をリンク (この場合、文字ではなく別フォルダに格納された画像を ファイル名からのリンクではなく、画像として表示された状態) し、ソート、検索出来るようにしたいと思っております。 そのようなことが可能なのでしょうか? 現在、エクセルのシートの縦列で画像のファイル名が入っており、 リンクでクリックすると画像が開けるようにはなっております。 エクセルのバージョンは2003です。 マクロ等は不慣れですので、もし使わないといけないようでしたら、 簡単にご説明いただけると助かります。 どうぞよろしくお願い致します。

  • エクセルのリンク貼り付けで挿入された画像について

    エクセル2010でリンク貼り付けで挿入された画像なのか 判別する方法はありますか? もし可能であれば方法を教えて下さい 回答お願いします

  • エクセルの表をリンク画像として貼りたいのですが

    エクセル2003を使っております。 A1:I10の表(10列10行)をコピーして、画像としてA20:G28(7列8行)貼り付けたいです。 ただしリンク画像として貼り付けたいんです(細かいサイズ調整ができるので) 表の値が変われば、画像の値も変わる・・・といった感じに。 いったんワードにリンク貼り付けして、その後ワードに貼り付けた物をエクセルにリンクオブジェクトとして貼ってみましたが、パス名がかわると使えないので駄目でした・・・ なにかいい方法ありますでしょうか? 他のPCでも使うのでパス名が変わったらリンクされないような方法では駄目なので・・・

  • 離れたセルのリンク貼り付けを行うためのマクロについて

    ブック(1)のシート(1)にある複数の離れたセル(B2,D2,C3,F3,B4:F4)をコピーし、別ブックのシート(1)のセル(B2,D2,C3,F3,B4:F4)へリンク貼り付けを実行するためのマクロを教えてください。 なお、ブック(1)とブック(2)はイントラの共有フォルダ上の同一階層に置いてあります。 このブック(1)と同一フォーマットのブックが複数存在し、上記同様にブック(2)の離れたセルをコピーして別ブックのシート(2)のセルへリンク貼り付け。 続いて、ブック(3)の同じセルをコピーし別ブックのシート(3)へリンク貼り付けと言うように、同じセルをコピーし別シートの同じセルへリンク貼り付けの作業を繰り返し行います。 まったく同じ位置のセルをコピー&リンク貼り付けを繰り返し行いたいので、マクロを使って自動実行させたいと思っています。 離れたセルのリンク貼り付けは出来ないのかもしれないですが、アドバイスを頂けると助かります。 宜しくお願い致します。

  • Word2010 画像 リンク貼り付け

    Word2010で、Excelの内容やファイルをリンク貼り付けすると、Excelの内容を変更すれば、Word上の中身も、その結果が反映されるのですが、「図(画像)」の場合、そもそも、「図の挿入」で「リンク」を設定することは出来ませんので、エクスプローラーで目的の画像ファイルを「右クリック」→「コピー」→Word上で「形式を選択して貼り付け」→「Files」を選択して「リンク貼り付け」にチェックを入れ、画像ファイルを貼り付けました。 Excelを貼り付けた場合は、その部分をクリックして「右クリック」すると「リンク先の更新」という項目が出て来て、「更新」できるのに、画像ファイルの場合、「リンク先の更新」がありません。 また、貼り付けた画像ファイルに変更を加えて保存しても、Word上では反映されません。 もちろん、Wordは、「文書を開いたときにリンクを自動的に更新する」にチェックが入った状態です。 Wordのファイルを保存して、Wordそのものも終了し、もう一度ファイルを開き直しても、やはり、貼り付けた画像に変更が反映されていません。 画像を「リンク」貼り付けした場合に、意味がないのであれば、「リンク貼り付け」そのものが「出来ない」状態ならまだ分かるのですが、「リンク貼り付け」したにもかかわらず、結果、何の意味も持たないので困っています。 クライアントから、リンク貼り付けを要求されているので、一応リンク貼り付けしてファイルは渡しましたが、私、何か間違っているのでしょうか? お教えください。