Excelのコントロールの書式設定について

質問

エクセルで報告書を作成しているのですが、
チェックボックスを作成し、チェックが１つでも入れば可、入っていなければ不可という表示をコントロールの書式設定のリンクするセルを用いて出来るのかなと思っているのですが、現段階でチェックオンにするとTRUE、オフにするとFALSEとしか出てきません。関数を利用して他の言葉を入れることが出来るのかご教示下さい。

回答No.2

Wendy02

こんにちは。

最初に、私は、日本語はむつかしいなって思いますね。

「チェックが１つでも入れば可、入っていなければ不可」
というと、チェックボックスが一つですか、複数ということでしょうか？

ひとつだけなら、
LinkedCell に指定されたセルに対して、
たとえば、

=IF(A1, "可","不可")

とすればよいし、

複数なら、

=IF(COUNTIF(A1:A10,TRUE),"可","不可")

ですから、LinkedCell 自体を隠れた場所においておけばよいです。

直接出したければ、コントロールツールの青い三角定規をオンにして、
チェックボックスをダブルクリックすると、画面が変わりますから、

Private Sub CheckBox1_Click()
　If CheckBox1.Value Then
　　Range("B1").Value = "可"
　Else
　　Range("B1").Value = "不可"
　End If
End Sub

'（LinkedCell は、何も入れないほうがよいです）

とすればよいのですが、複数の場合は、やはり関数の処理をしたほうが楽ですね。

お礼

今回チェックボックスは複数です。
１つ１つのチェックボックスでリンクセルを別々に設定するということですね。プログラミングのことはよくわからないので関数にしようと思います。ありがとうございました。

回答No.1

misatoanna

実際にリンク文字を表示したいセルを Ｂ２ とした場合ですが、
適当なセル（例えばＣ２）を実リンク先に指定し、Ｂ２に
=IF(C2=TRUE,"○","×")
とするとか。

お礼

リンクセルを別にすればいいのですね。
助かりました。ありがとうございました。