エクセルのチェックボックスについて

数個のチェックボックスがあり、
曜日によって非表示になるものが存在します。

そして、全てのチェックボックスにチェックが入る
ボタンを作成したのですが、
非表示なっているチェックボックスもチェックが入ってしまいます。
非表示になっているチェックボックスにチェックが入らないようにする
コード等はございますでしょうか。

宜しくお願いいたします。

No.2 ベストアンサー 回答者： くんこば 回答日時： 2021/01/15 12:39

あー、意味が分かった。

チェックする前に、visibleプロパティを見て、trueのものだけチェックすれば良い。

ちなみに、コントロールをまとめて処理したいなら、「VBA コントロール　コレクション」で検索すれば、いろいろ出てくる。

この回答へのお礼

If ActiveSheet.CheckBox1.Visible = True Then
ActiveSheet.CheckBox1.Value = True
End If
という形にしてみたのですが、非表示時もチェックが付いてしまいました。
チェックボックスの非表示の仕方はセル非表示と同期して非表示になっております。

「VBAコントロールコレクション」も調べてみます。
ありがとうございます。

お礼日時：2021/01/15 14:06

No.1 回答者： くんこば 回答日時： 2021/01/15 12:14

まず、今どんなコードになってる？

この回答へのお礼

全てチェックがつくマクロは
Private Sub CommandButton1_Click()
ActiveSheet.CheckBox1.Value = True
ActiveSheet.CheckBox2.Value = True
End Sub
と、なっております。
「 ActiveSheet.CheckBoxes.Value = True」
にすると、エラーになってしまった為です。

お礼日時：2021/01/15 12:29