Noelは、いくつかのチェックボックスを含むフォームを作成しました。誰かがチェックボックスを選択すると（チェックボックスが表示されるように）、「ロック」したいと思います

チェックボックスをオフにできないようにします。

フォームでActiveXチェックボックスを使用している場合、これは非常に簡単です。チェックボックスがクリックされると、そのチェックボックスに対してイベントがトリガーされることを覚えておく必要があります。チェックボックスにCheckBox1などのデフォルト名があるとします。この場合、CheckBox1_Click（）イベントがトリガーされます。イベントハンドラー内では、チェックボックスがオンのままであることを確認するなど、必要なことをほぼすべて実行できます。

Private Sub CheckBox1_Click()

MsgBox "ActiveX CheckBox1 Clicked"

If CheckBox1.Value = False Then CheckBox1.Value = True End Sub

このアプローチが機能するのは、チェックボックスがクリックされるたびにチェックボックスのValueプロパティが切り替えられるためです。 Falseに切り替わった場合（つまり、チェックされなくなった場合）、ValueプロパティをすぐにTrueに戻すことができます（チェックされていることを意味します）。これは次のように少し簡略化できます：

Private Sub CheckBox1_Click()

MsgBox "ActiveX CheckBox1 Clicked"

If Not (CheckBox1) Then CheckBox1 = 1 End Sub

実際、次のようにしてさらに単純化することができます。

Private Sub CheckBox1_Click()

MsgBox "ActiveX CheckBox1 Clicked"

CheckBox1 = True End Sub

_ExcelTips_は、費用効果の高いMicrosoftExcelトレーニングのソースです。

このヒント（13415）は、Microsoft Excel 2007、2010、2013、および2016に適用されます。