Reset button code for Radio Buttons
Does this code work for buttons within Microsoft Frames?
--
TASR
"Mike Rogers" wrote:
dworst
Place this in the worksheet module and attach it to your clear buttom or
keyboard short cut.
Sub testme()
Dim OptBTN As OptionButton
Dim OLEObj As OLEObject
For Each OptBTN In ActiveSheet.OptionButtons
OptBTN.Value = xlOff
Next OptBTN
For Each OLEObj In ActiveSheet.OLEObjects
If TypeOf OLEObj.Object Is msforms.OptionButton Then
OLEObj.Object.Value = False
End If
Next OLEObj
End Sub
Mike Rogers
" wrote:
I've created a form and I'm using Radio Buttons with an Option Box to
prevent the user from selecting multiple items. The problem is that
if by accident they choose one of the items within the option box and
don't really want that there is no way to clear the radio button. I'd
like to place a "reset" button in the form but don't know the code to
pub behind the button to clear all the radio buttons. Can someone
help me out please.....thanks in advance.
|