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

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

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

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

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

textual
Листинг программы
  1. Private Sub ToggleButton1_Click()
  2.    If ToggleButton1.Value = True Then
  3.         Worksheets(1).Activate
  4.         ToggleButton2.Value = False
  5.         ToggleButton3.Value = False
  6.    End If
  7. End Sub
  8.  
  9. Private Sub ToggleButton2_Click()
  10.    If ToggleButton2.Value = True Then
  11.         Worksheets(2).Activate
  12.         ToggleButton1.Value = False
  13.         ToggleButton3.Value = False
  14.     End If
  15. End Sub
  16.  
  17. Private Sub ToggleButton3_Click()
  18.     If ToggleButton3.Value = True Then
  19.         Worksheets(3).Activate
  20.         ToggleButton1.Value = False
  21.         ToggleButton2.Value = False
  22.     End If
  23. End Sub

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


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

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

8   голосов , оценка 3.625 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы