RicardoHorta.Net - Excel XP: Propriedade DisplayScrollBars
Parceria RicardoHorta.Net + SUBMARINO !!
Propriedade DisplayScrollBars - Aplica-se ao objeto.
Função.
- Exibe / oculta as barras de rolagem.
Sintaxe
- Application + . + DisplayScrollBars = True ou False.
Exemplo.
- Para ocultar as barras de rolagem, horizontal e vertical, ao mesmo
tempo, utilizando VBA, pressione [ Alt ] + [ F11 ]
ou clique em
Ferramentas, Macro, Editor do Visual Basic.
- Na janela Projeto, clique 2 vezes em EstaPasta_de_Trabalho.
- Na caixa Geral, selecione Workbook e...
- ... a procedure referente ao evento Open será criada.
- Digite Application, seguido de um ponto ( . ).
- No menu, escolha DisplayScrollBars.
- Acrescente o sinal de igual ( = ) e clique 2 vezes em False.
Testando.
- Retorne à tela do Excel XP.
- Salve as alterações e feche a pasta de trabalho.
- As barras de rolagem serão desativadas.
- Com o código Application.DisplayScrollBars=False, você desativa
as barras de rolagem de todas as pastas de trabalho.
Retornando o padrão.
- Para ativar as barras de rolagem, você pode utilizar o evento BeforeClose
da pasta de trabalho.
- Abra a tela do Editor do VBA.
- Na janela Projeto, clique 2 vezes em EstaPasta_de_Trabalho.
- Na janela Procedimento, selecione o evento BeforeClose.
- E digite: Application.DisplayScrollBars = True.
SUBMARINO: Fácil ! Rápido ! Seguro !
RicardoHorta.Net
SUBMARINO: Fácil ! Rápido ! Seguro !
www.ricardo.horta.nom.br - Direitos adquiridos - Autor: Ricardo Horta