for each obj in Activesheet.OleObject
if typeof obj.Object is MSForms.OptionButton then
obj.Object.Value = Fasle
end if
Next

--
regards,
Tom Ogilvy

"deKidd" wrote in message
...
Is there a way (using vb script) to set the value of activex controls
within
a group? I can set the value on individual controls, but when I tried
grouping them all together to set value on the group it fails. My
spreadsheet
has some 20+ activex controls (optionbuttons) & I need a way to reset them
all to "false" without having 20 lines of code to set each control value.
Any
suggestions?