deselect all option buttons in a frame

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

mikewild2000 - 19 Feb 2006 13:48 GMT

I'm half way there with this.

From the top.
I have the below code which tags the value of frame1 as row1, Ok so
far.
Now the bit i'm stuck at. Then i want to make all the optionbuttons in
frame1 false.

Dim MyMike
row1 = Val(Frame1.Tag)
If row1 <> IsNull(MyMike) Then
row1 = False
End If

Signature

mikewild2000

Reply to this Message

Tom Ogilvy - 19 Feb 2006 18:00 GMT

Dim ctrl as Control
for each ctrl in Userform1.Frame1.Controls
if typeof ctrl is MSForms.OptionButton then
ctrl.Value = False
end if
Next

IsNull doesn't test if a variable is empty. Use isEmpty

Signature

Regards,
Tom Ogilvy

> I'm half way there with this.
>
[quoted text clipped - 9 lines]
> row1 = False
> End If

Reply to this Message

mikewild2000 - 19 Feb 2006 19:21 GMT

thank you tom for your expert help.

I never thought of that method.

Signature

mikewild2000

Reply to this Message