www.ricardo.horta.nom.br - Excel XP: Objetos: CommandBarComboBox
SUBMARINO: Fácil ! Rápido ! Seguro ! E Ótimo !
CommandBarComboBox - O objeto.
- Representa um controle de caixa de combinação em uma barra de comandos.
Propriedades.
- Application, BeginGroup, BuiltIn, Caption, Creator,
DescriptionText, DropDownLines, DropDownWidth, Enabled, Height, HelpContextId,
HelpFile, Id, Index, IsPriorityDropped, Left, List, ListCount, ListHeaderCount,
ListIndex, OLEUsage, OnAction, Parameter, Parent, Priority, Style,
Tag, Text, TooltipText, Top, Type, Visible e Width.
Métodos.
- AddItem, Clear, Copy, Delete, Execute, Move, RemoveItem,
Reset e SetFocus.
Eventos.
Exemplo.
- Você criou um aplicativo no Excel XP e
deseja inserir, na barra de ferramentas Padrão,
uma caixa de opções...
- ... para substituir as tradicionais guias microsoftianas.
- Ok, microsoftiano(a).
- Abra uma pasta e...
SUBMARINO: Fácil ! Rápido ! Seguro ! E Ótimo !
Salvando.
- Clique no botão Salvar,...
- Pasta criada, vamos programar.
SUBMARINO: Fácil ! Rápido ! Seguro ! E Ótimo !
Módulo para armazenar o código.
- ... para receber a programação VBA.
SUBMARINO: Fácil ! Rápido ! Seguro ! E Ótimo !
Companheiras de trabalho.
- Declare as variáveis CaixaOpcoes,...
- ... como objeto CommandBarComboBox e...
- ... como objeto Worksheet.
SUBMARINO: Fácil ! Rápido ! Seguro ! E Ótimo !
Rotina CriaCaixaOpcoes - 01.
- ... à coleção de controles...
- ... da barra de ferramentas Padrão...
- ... um controle do tipo msoControlComboBox.
SUBMARINO: Fácil ! Rápido ! Seguro ! E Ótimo !
Rotina CriaCaixaOpcoes - 02.
- Com With CaixaOpcoes... End With,...
- ... acesse as propriedades do controle que está
sendo criado.
SUBMARINO: Fácil ! Rápido ! Seguro ! E Ótimo !
Formando a lista.
- Para cada planilha na coleção Worksheets,...
- ... para adicionar os nomes definidos nas guias.
As propriedades Style, Tag e Visible.
SUBMARINO: Fácil ! Rápido ! Seguro ! E Ótimo !
Ativando planilhas.
- Em seguida, crie a rotina para...
- ... ativar a planilha, selecionada na caixa de opções.
SUBMARINO: Fácil ! Rápido ! Seguro ! E Ótimo !
A rotina para deletar o controle da barra Padrão.
- ... declare Caixa como objeto CommandBarControl.
- Pesquise na coleção de controles,...
- ... da barra de ferramentas,...
- Achou a dita cuja ? Então, microsoftiano(a) esperto(a), extermine-a.
SUBMARINO: Fácil ! Rápido ! Seguro ! E Ótimo !
Workbook, Open e BeforeClose.
- Em EstaPasta_de_trabalho,...
- ... acesse Workbook e,...
- ... no evento Open, execute CriaCaixaOpcoes.
- ... localize BeforeClose e...
- ... delete o controle personalizado.
SUBMARINO: Fácil ! Rápido ! Seguro ! E Ótimo !
Teste - 01.
- ... clique em Ativar macros.
SUBMARINO: Fácil ! Rápido ! Seguro ! E Ótimo !
Teste - 02.
- ... selecione uma das opções.
- ... a planilha correspondente será ativada.
- Você não precisará das guias para...
- ... alternar entre as planilhas.
- Agora, vamos ao outro teste.
- Feche a janela e...
- ... o dito cujo será transformado em pó.
SUBMARINO: Fácil ! Rápido ! Seguro ! E Ótimo !
SUBMARINO: Fácil ! Rápido ! Seguro ! E Ótimo !
www.ricardo.horta.nom.br - Direitos adquiridos - Autor: Ricardo Horta