VBA: Связь между CommandButton и несколькими OptionButton

[fant1k]

Доброго времени суток всем.

У меня есть 2 optionbutton и кнопка command button. Как мне их связать между собой?
За ранее спасибо.

[Администратор]

Private Sub CommandButton1_Click()
    If Me.OptionButton1.Value = True Then
        MsgBox "Выбран optionbutton1"
    ElseIf Me.OptionButton2.Value = True Then
        MsgBox "Выбран optionbutton2"
    Else
        MsgBox "Не выбран ни один optionbutton"
    End If
End Sub

В прикрепленном файле форму запускайте прямо из VBA (кнопки я не делал для запуска формы).

[fant1k]

Спасибо большое за помощь.