VBA > Paski narzędziowe w oknach VBA > Zarządzanie paskami narzędziowymi > Usuwanie pasków narzędziowych

Drukuj

Usuwanie pasków narzędziowych

Oprócz ukrywania pasków narzędziowych możliwe jest również twałe usunięcie paska, który nie będzie już wykorzystywany w dalszej części programu.

 

Sub UsunToolbar()

Dim bar As CommandBar

Set bar = CommandBars("Pasek 1")

 

If Not bar Is Nothing Then

If bar.Type = msoBarTypeNormal Then

bar.Delete

End If

End If

End Sub