İçindekiler
Aşağıdaki makro ile Çalışma Kitabı Menü Çubuğu, Standart araç çubuğu ve özel bir Komut Çubuğunun kullanılabilirliğini değiştirebilirsiniz.
Makroyu ilk çalıştırdığınızda menü ve Standart çubuk devre dışı bırakılır, özel araç çubuğu etkinleştirilir.
Makroyu bir sonraki çalıştırışınızda menü ve Standart çubuk etkinleştirilir, özel Komut Çubuğu devre dışı bırakılır.
Sub ToggleCommandBars() Dim cbEnabled As Boolean ' mevcut komut çubuğu durumunu al cbEnabled = Not Application.CommandBars(1).Enabled ' yeni durumu Çalışma Kitabı Menü Çubuğuna uygula Application.CommandBars(1).Enabled = cbEnabled ' yeni durumu uygula Standart araç çubuğuna Application.CommandBars("StandardOPE").Enabled = cbEnabled ' yeni durumu özel bir komut çubuğuna uygula (önceki ikisinin tersi) Application.CommandBars("MyCustomCommandBar").Enabled = cbEnabled End Sub değil
