SUBMARINO: Fácil ! Rápido ! Seguro !

Parceria RicardoHorta.Net + SUBMARINO

• Você quer me ajudar ?
  Microsoftiano(a):
  Comprando no SUBMARINO, através do meu site, você me ajuda a preservar o meu projeto: Site pessoal com tutoriais sobre o Office microsoftiano, com acesso livre e gratuito.
  Pense nisto.
  Para acessar a Livraria SUBMARINO, clique aqui

Newsletter

Propriedade DisplayStatusBar - Aplica-se ao objeto.

• Application.

Função.

• Exibe / oculta a barra de status.

Sintaxe

• Application + . + DisplayStatusBar = True ou False.

Exemplo.

• Para ocultar a barras de status, utilizando o 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 DisplayStatusBar.

• Acrescente o sinal de igual ( = ) e clique 2 vezes em False.

• O código ficará assim.

Testando.

• Retorne à tela do Excel XP.

• Salve as alterações e feche a pasta de trabalho.

• Abra-a, novamente.

• Clique em Ativar macros.

• A barra de status será desativada.

• Com o código Application.DisplayStatusBar=False, você desativa a barra de status para todas as pastas de trabalho.

Retornando o padrão.

• Para recuperar o padrão do Excel XP, você pode utilizar o evento BeforeClose.
• 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.DisplayStatusBar = True.

SUBMARINO: Fácil ! Rápido ! Seguro !

SUBMARINO: Fácil ! Rápido ! Seguro !

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