• ベストアンサー

execlでの図の取り扱い

execlで挿入(ファイルから)した2つの図を入力項目のパターンによって表示の切り替えをしたいのですが、やり方がわかりません。 どなたか教えて下さい。 例) A図とB図をファイルから読み込んで!!入力セルに1が入力されたらA図を表示し、2が入力されたらB図を表示。A図とB図の表示位置は同位置!

質問者が選んだベストアンサー

  • ベストアンサー
  • hige_082
  • ベストアンサー率50% (379/747)
回答No.2

#1です 補足有難う御座います 対象の図を選んで下記のマクロを実行してみて A1に図の名前が書き込まれます それを#1のマクロの"Picture 1"・"Picture 2"に、それぞれ置き換えてください Sub 図の名前取得() MsgBox Selection.Name Range("a1") = Selection.Name End Sub

k_n_aris
質問者

お礼

ありがとうございました。 教えてもらった方法で無事できました。

その他の回答 (1)

  • hige_082
  • ベストアンサー率50% (379/747)
回答No.1

Private Sub Worksheet_Change(ByVal Target As Range) If Target.Value = 1 Then Shapes("Picture 1").ZOrder msoBringToFront Else Shapes("Picture 2").ZOrder msoBringToFront End If End Sub こんな感じで

k_n_aris
質問者

補足

hige_082さん ありがとうございます。 上記でやってみたのですが、”指定した名前のアイテムが見つかりません”のエラーが出ます。挿入した図をクリックすると”図14”とは”図15”とかの名前なので”Picture 1”を”図14”とかに変えたのですが、名前の見方が間違っているのでしょうか?あまりexeclは使わないので何も分からずすいません。