Set all option buttons on worksheet to off

[Newbeetle]

Hi I use the following below to set all checkboxes on sheet 1 to off, can the
same be done for option buttons on sheet 1. The option buttons used are from
the forms toolbar.


Private Sub clear_Click()
Worksheets("sheet1").CheckBoxes.Value = xlOff
End Sub


Have tried a copy of ideas but I haven't got there yet.

 

[Ken]

This seems to work fine for me:

Sub test()

For Each OptionButton In ActiveSheet.OptionButtons
OptionButton.Value = False
Next

End Sub

Good luck.

Ken
Norfolk, Va

 

[Dave Peterson]

How about something like:

worksheets("Sheet1").OptionButtons.Value = False

 

[Newbeetle]

Thanks Guys,