Как определить, выбран ли радиоблок в vba

Question

Как определить, выбран ли радиоблок в VBA？ Контроль формы ，

Set sht = ThisWorkbook.Sheets(1)
If sht.OptionButton1.Value = 1 Then
  MsgBox "ok！"
End If

не работает

Answer 1

Пример

Option Explicit

Public Sub Example()

    If ThisWorkbook.Sheets(1).OptionButtons("Option Button 1").Value > 0 Then
        MsgBox "Yes"
    Else
        MsgBox "No"
    End If

End Sub