エクセル２００７で条件が真の時にこうしたい！

質問

あるセルで数式が真の時、小さい画像を表示させたいと思っています。
そうでない時には塗りつぶし色で隠しておきます。

数式も画像も用意しましたが条件付き書式の中をさがしても、どんな道具を使えば
良いのかが解りません。

よろしくご教示下さい。お願いします。

回答No.3

某HN クロメート(Chromate)（@CoalTar） · ベストアンサー

訂正
× 7.Worksheet▼ Change▼
○ 7.Worksheet▼ Calculate▼
特に選択しなくても、コピペで問題ないです

お礼

>趣味程度のVBAかつXL2003での説明ですが

簡潔なご説明を頂きましたが、私の知識が至らず申し訳ない事にご回答すら　
もてあまして　半歩も前に進めずにおります。

補足

丁寧なご回答有難うございます。

事情があって23日までエクセルの処理が出来ません。
その後にトライして結果を出そうと思います。
よろしくお願いします。

回答No.2

某HN クロメート(Chromate)（@CoalTar）

趣味程度のVBAかつXL2003での説明ですが
0.準備としてわかりやすいように画像に名前を付けておく
1.マクロの自動記録
2.画像を選択
3.自動記録停止
4.[Alt]+[F11]VBE
5.標準モジュールの書き換え
Sub 真の時()
' 　 ActiveSheet.Shapes("写真1").Select を書き換えて
　 Worksheets("Sheet1").Shapes("写真1").Visible = True
End Sub

Sub 偽の時()
　 Worksheets("Sheet1").Shapes("写真1").Visible = False
End Sub
6.シートに戻って、シート見出し右クリック コードの表示
7.Worksheet▼ Change▼
Private Sub Worksheet_Calculate()
　 If Range("A1").Value = True Then
　 　 真の時
　 Else
　 　 偽の時
　 End If
End Sub
シートに戻って 計算を行うと、A1セルが真のときに表示、それ以外非表示

回答No.1

某HN クロメート(Chromate)（@CoalTar）

条件付き書式ではできないと思います(少なくともXL2003まではできません)

1. [Ctrl]+[F3]名前の定義
　 名前 : 画像1
　 参照範囲 =IF(Sheet1!$B$1,Sheet1!$C$1,Sheet1!$D$1)

　 名前 : 画像2
　 参照範囲 : =IF(Sheet1!$B$1,Sheet1!$D$1,Sheet1!$C$1)

2. 適当なセルをコピー

3. [Shift]押しつつ編集 - 図のリンク貼り付け
　(貼り付け▼ - 図のリンク貼り付け)

4. リンク貼り付けされた図の数式バー に
　 　 =画像1

5. B1セルに TRUE(またはFALSE)とすれば、
　 　C1セルに書かれた画像と、D1セルに書かれた画像が切り替わります

写真などの高解像度が必要なときの印刷は不向きです(解像度がかなり落ちる)
添付図参照、参考まで

補足

画像つきの丁寧なご回答有難うございました。

ご回答から想像すると、背景色だけのセルと画像をエクセル上にあらかじめ配置して置かないと機能しないと理解しました。

意味のあまりない背景色セルをエクセル上のどこかに用意するのは容易なのですけど画像は条件が満たされて表示されるまではどこにも置いておきたくないのですが、そうするとどのような処置をしておけば良いのでしょうか。ご説明が不十分で申し訳ありませんでした。