よくあるアンケートや記入用紙で該当する項目があればいくつでも選んで□にチェックを入れるような事をエクセルで出来ないかと思った事はありませんか?
Exce-VBAのチェックボックスを使う事で簡単に解決でき、セルに表示させる文字や値も自由に書き込むことができる方法をご紹介いたします。
目次
チェックボックス+IFステートメント
IFステートメント
エクセルに標準機能として用意されているVBA「IFステートメント」は、もし~だったら○〇、そうでなかったら××というように、条件に応じて「真」(True)・「偽」(False)を導き出す「条件分岐」の基本としてよく使うVBAです。
そしてVBA記述する時には「If~True ThenとElse」というように使いますので、いつものようにユーザーフォームに配置したコマンドボタンをクリックする事により、チェックボックス1の選択状況に応じて、判定できるようにVBAコードを書いていきましょう。
IFステートメント
Private Sub CommandButton1_Click()
If CheckBox1.Value = True Then
Range(“A3”).Value = “選択”
Else
Range(“A3”).Value = “未選択”
End If
End Sub
解説
- コマンドボタン1がクリックされたら
- もしチェックボックス1にチェックが入っていたら
- セルA3に「選択」と入力する
- そうではなかったら(チェックが無かったら)
- セルA3に「未選択」と入力する
- Ifステートメント終了
- マクロ記述終了

分かりやすくチェックボックス1個の時であれば、このようにIFステートメントを使えば簡単にでき、選択・未選択の文字も好きな表現に帰る事も可能です。


よく見られているページ
-
エクセルの計算式の値を数字として読み取るVALUE関数
-
VBAの画面のちらつきがたった1行で解決して処理高速化する方法
-
COUNT関数を使って参加人数を自動的に数えるエクセル関数使用法
-
エクセルの時刻表示を0:00ではなく24:00にする方法
-
チェックボックスでチェック有と無しそれぞれの処理を変える方法
-
1クリックで上書き保存してエクセルファイルを閉じる方法
-
エクセル計算式が#VALUE!エラーになったセルを空欄にする方法
-
条件に一致したセルを繰り返し探してVBAで文字色を変える方法
-
コマンドボタンの色をクリックするたびに黒色と赤色を入れ替える方法
-
エクセルシートの保護したらマクロエラーになった時のVBA対処法


新着ページ