Excel em tela cheia com barra de status - Tecnologias

Tecnologias

Assuntos diversos ligados à tecnologia.

Syndication

Receive Email Updates



Excel em tela cheia com barra de status

Muita gente gosta de trabalhar com o Excel em tela cheia, pois vemos praticamente apenas os dados, mas algumas vezes seriam interessante também possui as informações da barra de status.

O problema é que quando clicamos no botão tela cheia ela é automaticamente ocultada e não nos é fornecida uma opção de re-exibí-la.

Como contornar isso então?

Através do VBA!

Ok, mas mesmo mandando ela ser re-exibida via VBA, enquanto estiver em modo de tela cheia, a barra não volta. O que fazer então?

Simples. Basta simular o modo de tela cheia. Como assim?

Ocultando tudo o que ele oculta, exceto a barra de status.

Como fazemos isso?

A função a seguir realiza exatamente este procedimento e deve ser inserida de forma a ser executada na abertura da planilha:

1. Abra a planilha e pressione Alt + F11;

2. Na lado esquerdo da tela, na janela de Projeto, dê dois cliques em EstaPasta_de_trabalho;

3. Na janela do lado direito, clique na seta ao lado de (Geral) e selecione Workbook;

4. Neste momento será criada a macro a ser executada na abertura da planilha:

Private Sub Workbook_Open()

5. Agora insira o código dentro dela, conforme demonstrado abaixo:

Private Sub Workbook_Open()
    Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
    Application.DisplayFormulaBar = False
    ActiveWindow.DisplayHeadings = False
End Sub

6. Pronta, agora você tem uma planilha em tela cheia, mas com a barra de status!

IMPORTANTE: Caso você feche a planilha agora, a próxima que abri-la estará com este visual e pode não ser o que se deseja, então antes de fechá-la você deve restaurar os itens ocultados. Para isto realize o seguinte procedimento:

1. Clique no lado direito da tela, onde você lê Open e selecione BeforeClose;

2. Copie o código da Sub Open para a nova Sub;

3. Altere os três False que vê no código, por três True, conforme demonstrado abaixo:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"
    Application.DisplayFormulaBar = True
    ActiveWindow.DisplayHeadings = True
End Sub

4. Agora sim, tudo pronto!

Published sexta-feira, 24 de junho de 2011 13:35 by Paleo

Filed under:

Comments

# re: Excel em tela cheia com barra de status@ quarta-feira, 19 de dezembro de 2012 18:05

Parabéns! Muito útil!

Artur

# re: Excel em tela cheia com barra de status@ sábado, 16 de março de 2013 8:40

Ótimo, era isso que eu precisava!

Roberto

# re: Excel em tela cheia com barra de status@ sexta-feira, 22 de março de 2013 14:01

Cara muito obrigado,

era o que eu estava procurando!

Ricardo

# re: Excel em tela cheia com barra de status@ sexta-feira, 29 de março de 2013 14:36

Como faz para voltar para o normal???

Averton

# re: Excel em tela cheia com barra de status@ segunda-feira, 1 de abril de 2013 9:41

Averton, o procedimento para voltar ao normal está descrito no final do post, após "IMPORTANTE".

Paleo

Leave a Comment

(required) 
(required) 
(optional)
(required)