アクセス上位ページ
 
最近の更新内容
(2)-f.リストボックス ⇐ [PREV]
[NEXT] ⇒ (2)-h.オプションボタン

Excel VBA ≫ 5.ユーザーフォーム - 各種コントロール解説(2)-g.チェックボックス

チェックボックスのプロパティ

このページではチェックボックスValue プロパティについて解説します。

チェックボックスは "オン/オフ" や "有/無" など、2択から1つを選択するためのよく見かけるコントロールです。 通常はコントロールを設置して Caption プロパティや Value プロパティの初期値を設定するだけなので、 特に説明は不要でしょう。
ただ、チェックボックスはチェック状態でも未チェック状態でもない、"NULL状態"を表現することが可能ですので、 このページで解説したいと思います。



Value プロパティ以外の 前のページで説明した内容と同じプロパティについては説明を割愛させていただきます。 かわりにリンクをまとめてありますのでリンク先をご覧になってください。



チェック状態の取得および設定

  • Value プロパティ
  • チェック状態の取得および設定を行うには Value プロパティを使用します。 True を設定することでチェック状態、False を設定することで未チェック状態にすることができます。
    NULL状態にするにはプロパティウィンドウから設定する場合とコードから設定する場合で設定方法が異なります。 プロパティウィンドウから設定する場合は Value プロパティをクリアします。 コードから設定するには Value プロパティに NULL 値を設定します。

    • チェック状態
    • チェック状態
    • 未チェック状態
    • 未チェック状態
    • NULL状態
    • NULL状態

    <プロパティウィンドウでの初期値設定例>
    True/False を設定します。値をクリアするとNULL状態になります。 Value プロパティの値を設定 <コードの記述例(プロパティの設定)>
    'チェック状態に設定
    CheckBox1.Value = True
    
    '未チェック状態に設定
    CheckBox1.Value = False
    
    'NULL状態に設定
    CheckBox1.Value = NULL
    

    <コードの記述例(プロパティの取得)>
    以下のコードは、コマンドボタンのクリックイベントでチェックボックスのチェック状態を表示する例です。 NULL状態(NULL 値)の判定には IsNull関数 を使用します。
    Private Sub CommandButton1_Click()
        With CheckBox1
            If IsNull(.Value) Then
                MsgBox "NULL状態(NULL値)"
            ElseIf .Value Then
                MsgBox "チェック状態"
            Else
                MsgBox "未チェック状態"
            End If
        End With
    End Sub
    

  • NULL状態の使用用途
  • 上記では Value プロパティに NULL 値を設定することで、NULL状態にできることを説明しましたが、 どういう場合にこのNULL状態を使うのかを簡単な例を挙げて説明します。

    • 健康診断のアンケートで喫煙するかどうかを問う場合
    • 喫煙するか否かを問うためにチェックボックスを設置した場合を考えます。 初期状態で Value プロパティは False に設定されているものとします。 未チェック状態 このようにしてしまうと、チェックされていない場合にそれが単に非喫煙者なのか喫煙者がただチェックをし忘れたのかが判別できません。 特にアンケートなどチェック項目が多くなると、チェック項目を見落としてしまう可能性は高くなります。

      このような場合に初期状態として"NULL状態(NULL値)"を設定しておきます。 NULL状態 そして、アンケートを終了するときに NULL 値かどうかチェックすることで、ユーザーのチェック漏れを防ぐことができます。

      • チェック例
      • If IsNull(CheckBox1.Value) Then
            MsgBox "『喫煙』項目がチェックされていません。", vbExclamation
        End If
        
      • チェックボックスが NULL 値のままの場合のメッセージ
      • チェック漏れ

<サイト内関連リンク> 関連リンクもチェック!!
- コントロール一覧
- 各コントロールに共通のプロパティ
   (Width、Height、BackColor、Enabled、Visible、ControlTipText)
カテゴリ内ページ
Excel VBA 〜 総目次 〜
- 5.ユーザーフォーム
--- (2)-a.コントロール一覧
--- (2)-b.共通プロパティ
--- (2)-c.ラベル
--- (2)-d.テキストボックス
--- (2)-e.コンボボックス
--- (2)-f.リストボックス
--- (2)-g.チェックボックス
--- (2)-h.オプションボタン
--- (2)-i.トグルボタン
--- (2)-j.スクロールバー
--- (2)-k.スピンボタン
--- (2)-l.イメージ



Page
Top