Ho risolto così:
Private Sub UserControl_Click()
Dim rd As Object
RaiseEvent Click
For Each rd In UserControl.Parent
If TypeOf rd Is MyOptionButton Then
If contenitore = rd.Container Then

rd.Value = False
End If
End If
Next rd
Value = True

define_pic
End Sub
Dove contenitore è una variabile pubblica istanziata nel click dei miei option button:
Private Sub MyOptionButton1_Click()
Set contenitore = Me.MyOptionButton1.Container
End Sub
Così funge!
Grazie!