Вдавленная кнопка в userform - VBA

Узнай цену своей работы

Формулировка задачи:

Здравствуйте, подскажите, пожалуйста, как можно сделать вдавливаемую кнопку в vba. У меня на форме имеется много листов и каждая кнопка - это переход на конкретный лист, чтобы понять на каком листе я сейчас нахожусь, хотелось бы сделать вдавливаемую кнопку. То есть я нажимаю на кнопку "лист2" и эта кнопка, пока я остаюсь на листе2 остаётся вдавленной, если я нажимаю на другую кнопку, то она остаётся вдавленной.

Решение задачи: «Вдавленная кнопка в userform»

textual
Листинг программы
Private Sub ToggleButton1_Click()
   If ToggleButton1.Value = True Then
        Worksheets(1).Activate
        ToggleButton2.Value = False
        ToggleButton3.Value = False
   End If
End Sub
 
Private Sub ToggleButton2_Click()
   If ToggleButton2.Value = True Then
        Worksheets(2).Activate
        ToggleButton1.Value = False
        ToggleButton3.Value = False
    End If
End Sub
 
Private Sub ToggleButton3_Click()
    If ToggleButton3.Value = True Then
        Worksheets(3).Activate
        ToggleButton1.Value = False
        ToggleButton2.Value = False
    End If
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

8   голосов , оценка 3.625 из 5
Похожие ответы