Уведомление об ответе может попасть в папку "Спам".
На Яндексе (или в другой почтовой системе) пометьте полученное письмо "Не спам", чтобы уведомления не попадали в папку "Спам".
Или, если вы используете почтовую программу (а не браузер), то разрешите спаму попадать в папку "Входящие" (в этом случае в теме письма будет текст [OBORONA-SPAM]).

Выключатель Activex

Автор CHED, 23 мая 2015, 21:02

CHED

Выложил простой пример того, чтобы хотелось получить.
Есть две кнопки: включить и выключить график.
Можно ли как-то эти две кнопки (простые button) соединить в одну (Выключатель элемент Activex).
Чтобы при нажатии на нее (кнопка в состоянии "нажата")график включался, при повторном нажатии (кнопка "отжата") выключался график.

[вложение удалено администратором]

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

Вариант 1
Private Sub ToggleButton1_Click()
    If Me.ToggleButton1.Value = True Then
        ActiveSheet.ChartObjects("Диаграмма 1").Visible = msoTrue
    Else
        ActiveSheet.ChartObjects("Диаграмма 1").Visible = msoFalse
    End If
End Sub

Вариант 2
Private Sub ToggleButton1_Click()
    ActiveSheet.ChartObjects("Диаграмма 1").Visible = Me.ToggleButton1.Value
End Sub