Parceria RicardoHorta.Net + SUBMARINO !

A coleção.

• Representa a coleção de barras de comandos do Excel XP.

Propriedades.

• ActionControl, ActiveMenuBar, AdaptiveMenus, Application, Count, Creator, DisableAskAQuestionDropdown, DisableCustomize, DisplayFonts, DisplayKeysInTooltips, DisplayTooltips, Item, LargeButtons, MenuAnimationStyle e Parent.

Métodos.

• Add, FindControl, FindControls e ReleaseFocus.

Eventos.

• OnUpdate.

Sintaxe.

• Através da coleção CommandBars você acessa todas as barras de ferramentas do Excel XP. E isto inclui as barras criadas pelo aplicativo microsoftiano e as criadas por você.
• A sintaxe é: CommandBars("nome da barra") + . + propriedade = valor da propriedade.

Exercício.

• Você pode utilizar o evento Open para desativar as barras tradicionais do Excel XP quando a pasta de trabalho for aberta.
• E se você a desativou, será preciso exibi-la, novamente. Você poderá fazê-lo no evento BeforeClose, que ocorre antes da pasta de trabalho ser fechada.
• Então, vamos lá. Metendo a mão na massa. Abra uma pasta de trabalho para o exercício.
• Pressione [ Alt ] + [ F11 ] ou clique em Ferramentas, posicione o ponteiro em Macro e escolha Editor do Visual Basic.

• Clique 2 vezes com o botão esquerdo em EstaPasta_de_Trabalho.

• Clique na seta à direita da caixa Objetos e escolha Workbook.

• Open, o evento padrão da pasta de trabalho, será criado.

• Digite a instrução With Application...End With.

• Digite um ponto ( . ) e um menu será exibido.

• Localize e clique 2 vezes em CommandBars

• Entre parênteses e entre aspas, digite Standard. É o nome em inglês da barra de ferramentas Padrão. Aqui, não tem jeito. Tem que ser na língua americana. Deixe sua fobia de lado.

• Digite outro ponto e clique 2 vezes na propriedade Visible.

• Em seguida, digite o sinal de igual ( = ).

• Escolha False, para ocultar a barra de ferramentas.

• Salve as atualizações e...

• ... feche a pasta de trabalho.

Testando.

• Abra, novamente, a pasta. Será exibida esta mensagem. Clique no botão Ativar macros.

• A barra de ferramentas Padrão será desativada

Exibindo Padrão, novamente.

• Agora, temos que fazer o caminho inverso. Ao fechar a pasta de trabalho exemplo, é preciso ativar a barra Padrão.
• Pressione [ Alt ] + [ F11 ] ou clique em Ferramentas, posicione o ponteiro em Macro e escolha Editor do Visual Basic.

• Clique 2 vezes com o botão esquerdo em EstaPasta_de_Trabalho.

• Na caixa Procedimentos, escolha BeforeClose, evento que ocorre antes da pasta ser fechada.

• Digite o código abaixo. A única diferença aqui é fazer a propriedade Visible igual a True.

• Quando a pasta de trabalho for fechada, a barra de ferramentas Padrão será reativada.

Parceria RicardoHorta.Net + SUBMARINO !

Parceria RicardoHorta.Net + SUBMARINO !

www.ricardohorta.net - Direitos adquiridos - Autor: Ricardo Horta - 07/07/2003