Parcerias RicardoHorta.Net

Excel + VBA: Barras de rolagem - 01/07.

• Nos exercícios propostos no meu site, você aprendeu a trabalhar com as propriedades DisplayScrollbars, DisplayHorizontalScrollBar e DisplayVerticalScrollBar.
• DisplayScrollbars é propriedade do objeto Application, que representa o Excel XP.
• DisplayHorizontalScrollBar e DisplayVerticalScrollBar são propriedades do objeto ActiveWindow.
• Para compreender as diferenças entre essas propriedades, me acompanhe neste exercício. Vamos criar 3 botões e através do evento Click de cada um, vamos alterar estas 3 propriedades e observar o que acontece.
• Abra uma pasta de trabalho vazia.

• Ative a barra de ferramentas Caixa de ferram. de controle.

• Clique em Botão de comando e...

• ... clique na planilha.
• Mantendo o controle selecionado,...

• ... clique em Propriedades.

• Altere a propriedade Name...

• ... para CB_DisplayScrollBars.

• Em Caption, informe DisplayScrollBars.

• Clique na seta à direita de Font e...

• ... defina tipo, estilo e tamanho da fonte.
• Clique em OK.

• Tranquilo ? Então,...

• ... salve a pasta.

Parcerias RicardoHorta.Net

Excel + VBA: Barras de rolagem - 02/07: O segundo botão.

• Clique, novamente, em Botão de comando,...

• ... clique na planilha e...

• ... em Propriedades.

• Defina Name ( CB_DisplayHorizontalScrollBar ), Caption ( DisplayHorizontalScrollBar ) e...

• ... Font.

• Provavelmente, será preciso redimensionar...

• ... o controle.

Parcerias RicardoHorta.Net

Excel + VBA: Barras de rolagem - 03/07.

• Clique no ícone Botão de comando,...

• ..., insira o controle na planilha e,...

• ... em Caixa de ferramentas, clique em Propriedades.

• Formate o controle e...

• ... ajuste o...

• ... seu tamanho.

Parcerias RicardoHorta.Net

Excel + VBA: Barras de rolagem - 04/07.

• Clique 2 vezes com o botão esquerdo no botão CB_DisplayScrollBars ou...

• ... clique com o botão direito e escolha Exibir código.

• A procedure relativa ao evento padrão do controle ( Click ) será criada.

• Crie o bloco With Application... End With.

• Digite if seguido de um ponto.

• Selecione DisplayScrollBars.

• Complete com a palavra chave then ( if .DisplayScrollBars then ).
• Na próxima linha, digite outro ponto e...

• ... escolha, novamente, DisplayScrollBars.

• Digite o sinal de igual ( = ) e clique em False

Se a condição não for verdadeira...

• Digite a palavra chave Else.
• Digite outro ponto e...

• ... complete o teste.
• Não se esqueça da palavra chave End If, fechando o If.

Parcerias RicardoHorta.Net

Excel + VBA: Barras de rolagem - 05/07.

• Salve as alterações e...

• ... reexiba a planilha.

• Neste momento, Modo de design está ativado

• Para o teste, é preciso fechá-lo.

• Ok.

• Observe, microsoftiano(a), todas as barras estão ativadas. É o padrão dando o recado.

• Clique em DisplayScrollBars e...

• ... as barras vertical e horizontal serão desativadas.

• Utilize, novamente, o botão...

• ... para restaurar o padrão microsoftiano.

Parcerias RicardoHorta.Net

Excel + VBA: Barras de rolagem - 06/07.

• Ative, novamente, Modo de design.

• Abra o código do segundo botão e...

• ... programe o evento Click.

• Na janela Objeto,...

• ... selecione CB_DisplayVerticalScrollBar e...

• ... programe as ações.

Preparando para testar.

• Salve as alterações,...

• ... retorne para a planilha e...

• ... saia do Modo de design.

Parcerias RicardoHorta.Net

Excel + VBA: Barras de rolagem - 07/07 ( Final ).

• Barra de rolagem horizontal ativada,...

• ... clique em DisplayHorizontalScrollBar e...

• ... a dita irá para o espaço. Coitada.

• Clique, novamente, no botão e...

• ... a barra horizontal será reativada.

• Teste também DisplayVerticalScrollBar e o código VBA será executado como manda o figurino.

Confabulações microsoftianas.

• DisplayScrollBars ativa / desativa as barras de rolagem horizontal e vertical de todas as pastas de trabalho abertas.
  DisplayScrollbars pertence ao objeto Application, por isso todas as pastas abertas são afetadas.
• Já DisplayHorizontalScrollBar e DisplayVerticalScrollBar pertencem ao objeto ActiveWindow, que representa a janela ativa. Logo, estas propriedades afetam apenas a janela ativa. As outras pastas, abertas em outras janelas, continuarão com as barras horizontal e vertical ativadas.
• DisplayScrollBars, DisplayHorizontalScrollBar e DisplayVerticalScrollBar são propriedades com alcances diferentes, próprias para serem utilizadas em momentos diferentes.
  E que momentos são esses ? Aí, é com você, é com o seu aplicativo.

Parcerias RicardoHorta.Net

RicardoHorta.Net

Parcerias RicardoHorta.Net

www.ricardo.horta.nom.br - Direitos adquiridos - Autor: Ricardo Horta