エクセルのVBAコードについて教えてください。

作業シートに
Private Sub Worksheet_Change(ByVal Target As Range)
Sheets("消防の指摘一覧（参考資料）").Visible = [E114] = True
End Sub
を設定しております。
チェックボック15をにチェックを入れるとセルE114に「True」と表示され、
非表示シート「消防の指摘一覧（参考資料）」が表示できるように設定しましが、
チェックを入れても非表示シートが上手く表示されません。
又、セルE114に直接「True」と入力すると非表示シートが表示されました。
この解決方法を教えてください。
よろしくお願いいたします。

No.1 ベストアンサー 回答者： fujillin 回答日時： 2025/03/15 15:13

こんにちは

リンクセルの値の変化ではChangeイベントは発生しません。
（計算式による値の変化も同様です）
https://answers.microsoft.com/ja-jp/msoffice/for …

リンクセルを参照する計算式を設定しておいて、Calculateイベントで取得する方法なら取得できますが、Calculateイベントの場合は発生元をチェックできないので、シートの状態にもよりますが効率的ではないと思われます。

チェックボックスの種類が不明ですが、イベントあるいはマクロを登録しておいて、そちらで処理をするのが一番簡単でしょう。
（フォームコントロールならマクロの登録、ActiveXコントロールならイベント処理）
チェックボックスの数が多い場合には、カスタムイベントでまとめて処理する方法もあったように思います。
https://vbanobuhinko.com/%E5%9F%8B%E3%82%81%E8%B …

この回答へのお礼

回答ありがとうございます。
色々と教えていただきましてありがとうございます。
早速試してみます。

お礼日時：2025/03/15 15:36