Looping through Option buttons
thanks a lot for letting me know it helped.
:)
susan
n May 7, 1:44 pm, Ayo wrote:
Thanks a lot Susan for all the help. Everything is working great now.
"Susan" wrote:
ok, i think this is what you want.
Private Sub optionbutton1_click()
Call Disable_Controls
End Sub
Private Sub optionbutton2_click()
Call Disable_Controls
End Sub
Private Sub optionbutton3_click()
Call Disable_Controls
End Sub
'add as many as you need for all your control buttons
Sub Disable_Controls
Dim optProject As Control
For Each optProject In fraProject.Controls
If optProject.Value = True Then
optProject.Enabled = True
Else
optProject.Enabled = False
End If
Next optProject
End Sub
no matter which option button is selected, the other ones will become
disabled. this does NOT go in the initialization sub. they are
separate subs within the userform coding.
hope this (finally!) helps
:)
susan- Hide quoted text -
- Show quoted text -
|