Hello, I posted this same question in another discussion group, but I
actually meant to post it on this one.

My question is: Why doesnt this work. I know it works for a check box but I
dont know how to make it to do the same function using the option buttons.

Private Sub OptionButton1_Click()
Me.TextBox1.Enabled = Not Me.OptionButton1.Value
Me.TextBox2.Enabled = Not Me.OptionButton1.Value
End Sub

If you're clicking on the optionbutton, aren't you always turning it on?

Maybe using
Private Sub OptionButton1_Change()
would be better.

N.F wrote:

Hello, I posted this same question in another discussion group, but I
actually meant to post it on this one.

My question is: Why doesnt this work. I know it works for a check box but I
dont know how to make it to do the same function using the option buttons.

Private Sub OptionButton1_Click()
Me.TextBox1.Enabled = Not Me.OptionButton1.Value
Me.TextBox2.Enabled = Not Me.OptionButton1.Value
End Sub

--

Dave Peterson

Not sure but you probably need to add another option button

"N.F" wrote:

Hello, I posted this same question in another discussion group, but I
actually meant to post it on this one.

My question is: Why doesnt this work. I know it works for a check box but I
dont know how to make it to do the same function using the option buttons.

Private Sub OptionButton1_Click()
Me.TextBox1.Enabled = Not Me.OptionButton1.Value
Me.TextBox2.Enabled = Not Me.OptionButton1.Value
End Sub