オプションボタン(optionbutton)の名前変更と使い方

オリジナル入力フォームが作ることができる「ユーザーフォーム」のパーツのひとつで、「男」「女」などの性別のように2つ以上の選択肢の中から1つだけ選ぶことができるようになっているコントロールパーツの事を「オプションボタン」といいます。

ここではオプションボタンの基本的な使い方についてご紹介します。

オプションボタン

オプションボタンの特徴は、上の図を参考にすると「男」を選択すると（True）もう一方の「女」は自動的に未選択状態（False）に設定されます。

これにより、グループ内にたくさんのオプションボタンがあっても1つしか選択できないようになっています。

では、上の画像の性別の部分を実際にVisual Basic Editor（VBE）を起動して、作ってみましょう。

起動方法から説明を始めると長くなってしまうのでここでは省略しますので、下記をご覧くださいませ。

オプションボタン(optionbutton)を配置する

オプションボタンを配置したいユーザーフォームに、ツールボックスのオプションボタンを2個配置します。（男女1個ずつ）

配置ができたら見栄え良く大きさと位置を整えますので名前を変更できるプロパティで変更します。

オプションボタンの名前を変更

OptionBtton1・OptionButton2という表示のままでは、使う人に何を選ぶのか伝わらないので表示を変更します。

OptionButton1をクリックすると画面左にOptionButton1のプロパティが表示されますので、7行目の項目Captionの部分が表示される名前です。

「OptionButton1」となっている名前を「男」に書き換えれば、表示名が変更できますので、同じように「OptionButton2」も「女」に書き換えましょう。

これでユーザーフォーム上のオプションボタンの準備は完了です。ただせっかくなので「性別」という枠を付けてあげると体裁が整うので、ついでに枠を付けましょう。

グループになっている枠名称変更

この枠は「フレーム」（Frame）といいます。

オプションボタンを選んだ時と同じようにツールボックスからフレームを選んでユーザーフォームに空いているスペースに配置し、名前を「Frame1」を「性別」に変更します。

次にすでに作成してある男女のオプションボタンをフレームの中に入れます。

オプションボタンがフレームの中に納まったら、再度大きさなどを好みの大きさに調整して、実際に配置したい場所に移動させます。

この時フレームを移動すれば一緒にオプションボタンもセットで動いてくれます。

これでユーザーフォームに性別を選択するオプションボタンが完成しました。

コマンドボタンで性別をセルに書き込む

オプションボタンやフレームだけでは実用的ではなく、性別を選択してコマンドボタンを押すことで、目的のセルに書き込みます。

ここでは、コマンドボタン1を押すことでセルA1に選択されたオプションボタンの値を書き込むようにします。

これでオプションボタンを選択した時に男女が番号になって記述されます。

ちなみに、オプションボタンの名前（キャプション）のままで記述する時は、

Range(“A1”).Value = OptionButton1.Caption

とすれば、そのまま記述されます。

3つ以上のオプションボタン

オプションボタンは2つ以上使うことができグループ化できます。

上の図は8つのオプションボタンを使用して必ず1つは選択するようにしていますが、チェック漏れも当然ありますので未選択時に警告を発するようにすることでエラーを防ぐことも重要ですよ！

関連記事