本文へスキップ
  1. トップページ>
  2. Tips>
  3. Excel2010、リンクされたイメージを表示できませんの原因

Tipstips

備忘録として、主にパソコン関係のTipsを記載して行きます。


新着情報
Access2010、最新のレコードを安定して取得する方法
Windows10、マッハドライブはアンイストールすべき
パソコンの動作が遅い、SSDによる高速化2
Netflix、解像度が低い時の対処方法
Access2010、定義XMLによるスキーマの確認が失敗する時の対処方法

Excel2010、リンクされたイメージを表示できませんの原因

Excel2010は、手頃な価格で高機能な表計算ソフトです。
マクロを使用すると、色々な作業を自動化する事ができて、大変便利です。

しかし、リンクされたイメージを表示できない現象が発生しました。
使用したパソコンは、下記のソフトを使用していました。

OS       : Windows7(64bit)
表計算ソフト   : Excel2010(32bit)

以下、Excel2010、リンクされたイメージを表示できませんの原因と対策を記載して行きます。

(項目1)
 ・Excel2010でプログラムを開発している時、リンクされたイメージを表示できない現象が発生し
  ました。
 ・Excel2010でファイルを開いた所、下記の様な画像が表示されました。
  

(項目2)
 ・上記の現象は、Excel2002で作成した物を、Excel2010で開いた時に起きました。
 ・本来は、写真が表示される場所です。
 ・画像のメッセージは、以下の通りでした。
  「リンクされたイメージを表示できません。ファイルが移動または削除されたか、名前が変更された
   可能性があります。リンクに正しいファイル名と場所を指定されていることを確認してください。」

(項目3)
 ・インターネットで、「エクセル+リンクされたイメージを表示できません」をキーワードにして検索した所、
  画像ファイルを挿入する:Excel VBA|即効テクニック|Excel VBAを学ぶならmougが見つかりました。
 ・上記の情報によると、「Excel 2007までは画像情報と一緒に保存されていたのに対し、Excel 2010でリンク
  貼り付けに仕様が変わるなど、Excelのバージョンによって画像の保存方法が異なります。
」との事です。

(項目4)
 ・Excel 2010 で Pictures.Insert メソッドを使用して図をワークシートに挿入すると図がリンク オブジェクトとして挿入されるを参考に、ActiveSheet.Pictures.InsertActiveSheet.Shapes.AddPictureに変更し、
  セルに貼り付ける位置を指定する方法で解決しました。

 ・変更前
  If Dir(TargetFolder & "EBM#" & i - 1 & ".BMP") <> "" Then
   Range("M" & 6 + i - 1).Select
   ActiveSheet.Pictures.Insert(TargetFolder & "EBM#" & i - 1 & ".BMP").Select
  End If

 ・変更後
  If Dir(TargetFolder & "EBM#" & i - 1 & ".BMP") <> "" Then
   Range("M" & 6 + i - 1).Activate
   objFileName = TargetFolder & "EBM#" & i - 1 & ".BMP"
   Set objShape = ActiveSheet.Shapes.AddPicture( _
   Filename:=objFileName, _
   LinkToFile:=False, _
   SaveWithDocument:=True, _
   Left:=Selection.Left + 1, _
   Top:=Selection.Top + 1, _
   Width:=60# - 2, _
   Height:=60# - 2) '(ピクセル)/(96/72)
  End If

(項目5)
 ・以上で、Excel2010、リンクされたイメージを表示できませんの原因と対策と対策は終了です。
 ・本現象は、Excel2010の仕様と思われます。



contents

エクセル将棋館

日本国

地方都市

e−mail(e−mail


スポンサード リンク