オプションボタン－ActiveXコントロールの使用方法

Excel2013のActiveXコントロール　オプションボタンの使用方法です。

リボンの［開発］－［挿入］－［オプションボタン（ActiveXコントロール）］をクリックします。

シート上でドラッグし配置します。
オプションボタンをクリックし選択し、リボンの［プロパティ］をクリックします。

プロパティダイアログボックスがひらくので、「Caption」にタイトルを入力します。

オプションボタンをダブルクリックし、クリックされた時に発生するイベントを入力します。ここでは、クリックされたらセルにタイトルを表示するようにしました。

Private Sub OptionButton1_Click()
    Range("E4") = "お水"
End Sub

Private Sub OptionButton2_Click()
    Range("E4") = "お茶"
End Sub

Private Sub OptionButton3_Click()
    Range("E4") = "ジュース"
End Sub

リボンの［デザインモード］をクリックしOFFにすると、実行できるようになります。
それぞれのオプションボタンをクリックすると、そのタイトルがE4セルに表示されます。