Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

44878 / 76735

←次へ　｜　前へ→


	【36866】Re:オプションボタンをクリックしないと...

だるま

- 06/4/17(月) 9:31 -


	引用なし

	パスワード

順番を変え、あらためて注釈を加えておきます。
意味を理解していただき、ご自身のプログラムに反映させてください。^d^

'フォーム起動時に登録ボタンを押せないようにしておきます。
Private Sub UserForm_Initialize()
　　Me.CommandButton1.Enabled = False
End Sub

'オプションボタン1が選択されたら
Private Sub OptionButton1_Click()
　　EnterEnable
End Sub

'オプションボタン2が選択されたら
Private Sub OptionButton2_Click()
　　EnterEnable
End Sub

'オプションボタン3が選択されたら
Private Sub OptionButton3_Click()
　　EnterEnable
End Sub

'登録ボタンが押せるようにします。
Private Sub EnterEnable()
　　Me.CommandButton1.Enabled = True
End Sub

0 hits

▼

【36845】オプションボタンをクリックしないと登録ボタンに無効する方法は？ saru@ 06/4/15(土) 11:46