ExcelVBA ユーザーフォーム オプションボタンについて いつもお世話になっております。 ユーザ

ExcelVBA ユーザーフォーム オプションボタンについて

いつもお世話になっております。

ユーザーフォーム オプションボタンの初期値について教えて下さい。

1項目には東京 大阪 愛知 福岡
のオプションボタンがあります。

2項目には関東 関西 中部 九州
のオプションボタンがあります。

1項目で東京をチェックしたら
2項目は自動的に関東が初期値としてチェックされるようにしたいのですが、そのコードを教えて頂けないでしょうか？

宜しくお願い致します。

No.1 ベストアンサー 回答者： Qchan1962 回答日時： 2020/02/23 23:01

こんばんは、

Private Sub OptionButton1_Change()
　If 東京 = True Then
　　関東 = True
　End If
End Sub
ちゃんとFrameで括ってくださいね。

この回答へのお礼

出来ました～!!
ありがとうございます♪
勉強させて頂きました。
また宜しくお願い致します(*´∀｀*)

お礼日時：2020/02/24 13:07

No.2 回答者： Qchan1962 回答日時： 2020/02/23 23:03

OptionButton1　は、東京

関東 = True　関東は対象OptionButton