ユーザーフォームに配置したチェックボックスの使い方としては、基本的にチェックを入れたら指定したセルに文字や数字を記載するために使いますが、その逆の使い方でセルの値を読み取って自動的にチェックを入れることができないのかなと思ったことありませんか？

波乗りアヒル

例えば住所録でDM送付「希望あり」と「希望無し」をチェックボックスで選択しておいて、個人データが呼び出された時に、ユーザーフォームのチェックボックスも自動的にチェックの有無が表示されるようにしたい。

このような場合、チェックボックスのプロパティでは状況判断する設定は無いので、IFステートメントを使って表示させることが可能なので、ご紹介いたします。

基本的なチェックボックスの使い方については重複してしまうので、ここでは省略しますので下記を参考にしてください。

チェックボックスの基本処理

チェックボックスでチェック有と無しそれぞれの処理を変える方法 よくあるアンケートや記入用紙で該当する項目があればいくつでも選んで□にチェックを入れるような事をエクセルで出来ないかと思った事はありませんか？ Exce-VBAのチェ…

セルの値からチェックボックスの状態を取得しよう

IFステートメントで取得

下の図のようにセルA1に「DM」と入力されていたら、DM希望するチェックがある状態として（True）、空欄だったらDM不要ととしてチェックが無い状態として（False）とします。

そうすることにより、セルA1の値が【DM】となっていたらチェックを入れた状態にして、空欄だったらチェックを外すことができるので、セルの状態によってチェックボックスの状態を自在にコントロールできるようになります。

それでは、ユーザーフォームに配置したコマンドボタン1をクリックするとチェックボックス1がセルA1の状態を認識してチェックの有無ができるようなVBAコードをご紹介します。

もちろん、セルA1の値を消して空欄にしたらコマンドボタンを押してもチェックボックスには何も入りません。

波乗りアヒル

実際にはこのような使い方はしませんが、セルの値によってチェックボックスの状態を取得する事ができるようになるVBAコードを記述することができました。

関連記事

よくあるアンケートや記入用紙で該当する項目があればいくつでも選んで□にチェックを入れるような事をエクセルで出来ないかと思った事はありませんか？

Exce-VBAのチェックボックスを使う事で簡単に解決でき、セルに表示させる文字や値も自由に書き込むことができる方法をご紹介いたします。

チェックボックス＋IFステートメント

IFステートメント

エクセルに標準機能として用意されているVBA「IFステートメント」は、もし～だったら○〇、そうでなかったら××というように、条件に応じて「真」（True）・「偽」（False）を導き出す「条件分岐」の基本としてよく使うVBAです。

そしてVBA記述する時には「If～True ThenとElse」というように使いますので、いつものようにユーザーフォームに配置したコマンドボタンをクリックする事により、チェックボックス1の選択状況に応じて、判定できるようにVBAコードを書いていきましょう。

波乗りアヒル

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

関連記事