Форум по VBA и MS Office

VBA, Excel => VBA, макросы в Excel => Тема начата: fant1k от 02 марта 2017, 15:35

Название: VBA: Связь между CommandButton и несколькими OptionButton
Отправлено: fant1k от 02 марта 2017, 15:35
Доброго времени суток всем.

У меня есть 2 optionbutton и кнопка command button. Как мне их связать между собой?
За ранее спасибо.
Название: Re: VBA: Связь между CommandButton и несколькими OptionButton
Отправлено: Администратор от 02 марта 2017, 15:43
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 (кнопки я не делал для запуска формы).
Название: Re: VBA: Связь между CommandButton и несколькими OptionButton
Отправлено: fant1k от 02 марта 2017, 16:43
Спасибо большое за помощь.