deselect all option buttons in a frame

[mikewild2000]

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

[Tom Ogilvy]

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


--
Regards,
Tom Ogilvy

"mikewild2000" <mikewild2000.23hbha_1140357001.3242@excelforum-nospam.com>
wrote in message
news:mikewild2000.23hbha_1140357001.3242@excelforum-nospam.com...
>
> 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
>
>
> --
> mikewild2000
> ------------------------------------------------------------------------
> mikewild2000's Profile:
http://www.excelforum.com/member.php...fo&userid=3276
> View this thread: http://www.excelforum.com/showthread...hreadid=514129
>

[mikewild2000]

thank you tom for your expert help.

I never thought of that method.