VBA > Paski narzędziowe w oknach VBA > Zarządzanie przyciskami na paskach narzędziowych > Ustawienie przycisku jako wciśnięty lub podniesiony

| Drukuj

Ustawienie przycisku jako wciśnięty lub podniesiony

CommandBars("Pasek 1").Controls("&Dokument").State=msoButtonDown

lub

CommandBars("Pasek 1").Controls(1).State=msoButtonDowna

lub

Przycisk.State=msoButtonDown

 

i na odwrót podniesienie przycisku można osiągnąć poprzez ustawienie State=msoButtonUp.

 

pasek_wcis pasek1_wcis

Ustawiając odpowiednio przyciski na przyciśnięte/podniesione można uzyskać efekt pojedynczego wciskania i podnoszenia guzika, jak również RadioButtonów, poprzez podnoszenie i opuszczanie odpowiednich guzików.