Abrir o Excel em tela cheia ocultar barras, guias e ferramentas

Validar a existência de arquivos Excel VBA
Verificar arquivo existe utilizando VBA Excel
2 de novembro de 2015
Desmesclar células Excel VBA
Desmesclar células Excel VBA – Como retirar mesclagem de células com VBA
9 de novembro de 2015

Abrir o Excel em tela cheia ocultar barras, guias e ferramentas

Neste artigo é demonstrado como abrir o Excel em modo de tela cheia, muito utilizado para trabalhar o Excel como um sistema, evitando que o usuário tenha acesso á recursos do Excel e facilitando a leitura dos dados no modo de tela cheia.

Primeiro habilite a guia desenvolvedor clicando em Arquivo->Opções->Personalizar faixa de opções e marque a opção Desenvolvedor, isso na versão do Excel de 2010 á 2016.

Habilitar a guia desenvolvedor Excel 2010 2013 2016

Para o Excel 2007 faça:

  • No Excel 2007 clique no botão com o símbolo do Microsoft Office;
  • Clique no botão Opções na janela que segue clique no botão Geral na esquerda;
  • Marque a opção Habilitar Guia Desenvolvedor;

Uma vez habilitada clique na guia Desenvolvedor e no botão Visual Basic.

Clique duas vezes sobre Esta pasta de trabalho e cole os códigos abaixo apresentados.

Copiar código VBA da internet

Se você já conhece bem o VBA pode criar um módulo para uma questão de organização e colar os códigos.

Aqui você encontrará o código comentado e pode fazer o download do arquivo ao final do artigo.

Sub lsLigarTelaCheia()
    'Oculta todas as guias de menu
    Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
    
    'Ocultar barra de fórmulas
    Application.DisplayFormulaBar = False
    
    'Ocultar barra de status, disposta ao final da planilha
    Application.DisplayStatusBar = False
    
    'Alterar o nome do Excel
    Application.Caption = "Controle de manutenção de veículos 3.0"
    
    With ActiveWindow
        'Ocultar barra horizontal
        .DisplayHorizontalScrollBar = False
        
        'Ocultar barra vertical
        .DisplayVerticalScrollBar = False
        
        'Ocultar guias das planilhas
        .DisplayWorkbookTabs = False
        
        'Oculta os títulos de linha e coluna
        .DisplayHeadings = False
        
        'Oculta valores zero na planilha
        .DisplayZeros = False
        
        'Oculta as linhas de grade da planilha
        .DisplayGridlines = False
    End With
End Sub

Sub lsDesligarTelaCheia()
    'Reexibe os menus
    Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"
    
    'Reexibir a barra de fórmulas
    Application.DisplayFormulaBar = True
    
    'Reexibir a barra de status, disposta ao final da planilha
    Application.DisplayStatusBar = True
    
    'Reexibir o cabeçalho da Pasta de trabalho
    ActiveWindow.DisplayHeadings = True
    
    'Retornar o nome do Excel
    Application.Caption = ""
    
    With ActiveWindow
        'Reexibir barra horizontal
        .DisplayHorizontalScrollBar = True
        
        'Reexibir barra vertical
        .DisplayVerticalScrollBar = True
        
        'Reexibir guias das planilhas
        .DisplayWorkbookTabs = True
        
        'Reexibir os títulos de linha e coluna
        .DisplayHeadings = True
        
        'Reexibir valores zero na planilha
        .DisplayZeros = True
        
        'Reexibir as linhas de grade da planilha
        .DisplayGridlines = True
    End With
End Sub

Aplicamos estes códigos aos botões do exemplo, mas se quiser que ao abrir a pasta de trabalho a mesma já seja apresentada em modo de tela cheia, utilize o código abaixo, aplicando diretamente sobre Esta pasta de trabalho.

'Chama o procedimento de tela cheia ao abrir a pasta de trabalho
Private Sub Workbook_Open()
    lsLigarTelaCheia
End Sub

'Desliga o modo de tela cheia ao fechar a pasta de trabalho
Private Sub Workbook_Close()
    lsDesligarTelaCheia
End Sub

At.
Marcos Rieper

63 Comments

  1. Diogo Ribeiro disse:

    Muito bom funciona na perfeição. Aproveito para perguntar se é possível colocar no código VBA para excel 2013 uma forma de bloquear a janela do excel. Eu consigo definir o tamanho da janela, mas pretendo que não seja possível alterar/redimensionar a janela. É possível? Obrigado!!

  2. Vinicius Machado disse:

    Como faço para reexibir as barras?

    • Marcos Rieper disse:

      Olá Vinicius,

      Será necessário aplicar a função lsDesligarTelaCheia que está descrita no artigo, é só executá-la que as barras voltam.

      Abraço
      Marcos Rieper

      • Roneilli disse:

        Olá é possível implementar o código de maneira automática da seguinte forma: quando abro a planilha executa código para ligar tela cheia, quando fecho executa código desligar tela cheia, isso para quando abrir outro arquivo ele esteja normal sem estar em
        Tela cheia?

  3. Vinicius Gomes disse:

    Olá Marcos,

    Quando o arquivo está no modo de tela cheia eu não consigo abrir um outro arquivo em Excel sem que ele fique também no modo de tela cheia.

    Existe uma forma de restringir a tela cheia apenas para a planilha que estou utilizando, permitindo que qualquer outro arquivo quando aberto posteriormente venha normalmente (sem tela cheia).

    Obrigado desde já!
    Abç
    Vinicius Gomes

  4. Pedro Costa disse:

    Ótimas dicas, mas as minhas barras de fórmulas não ficam visíveis em outras planilhas depois que executo o arquivo com os códigos que você disponibilizou. Como posso resolver isso para que a barra fique visível para as outras planilhas que eu abrir, após ter fechado o arquivo com os códigos? (Sem precisar ir sempre na opção Avançado-> Exibir-> Mostrar barra de fórmulas). Desde já muito grato.

    • Marcos Rieper disse:

      Olá Pedro,

      Na macro lsDesligarTelaCheia você tem comentado cada um dos comandos que desfazem as operações.

      No caso deste:

      ‘Reexibir a barra de fórmulas
      Application.DisplayFormulaBar = True

      Abraço
      Marcos Rieper

  5. Pedro disse:

    Parabéns Marcos Rieper! Só tive um problema, pois ao fechar o arquivo em tela cheia e abro outro arquivo a minha barra de fórmulas desaparece e tenho que ir “Opções do Excel” para que ela possa voltar a ser exibida, tem como arrumar o código para que ela apareça, pois o código acima não reexibe a barra de fórmulas do excel, já testei em dois PC’s e tenho o mesmo problema. Certo de sua compreensão, muito obrigado!

  6. Douglas Oliveira disse:

    Ola marcos, td bem?

    esse comando ** Application.ExecuteExcel4Macro (“SHOW.TOOLBAR(“”Ribbon””,True)”) ** era exatamente o que eu precisava aqui, mas como faço para aplicar somente na pasta de trabalho em que ele é executado ??

    PS: esses comando que usam o “Application” quebram as pernas … só uso-o em .Save, .ScreenUpdating, .DisplayAlerts, outros comandos é muito ruim…

  7. abner lima disse:

    Olá,muito bom esse código, exatamente o que eu precisava, mas faltou reexibir a barra de status,
    eu usei esse comando para reexibi-la

    With Application

    .DisplayStatusBar = True

    End With

  8. Olá Marcos,

    Funcionou muito bem, porém tenho uma dúvida, eu atribuir uns Hiperlink para mais duas planilhas e quando vou para segunda ou terceira plan, a parece as linhas 1;2;3 etc e as colunas A;B;C, qual é o código que atribui para todas as planilhas qnd selecionadas?

  9. onias disse:

    olá amigo
    bom noite, não sei o que aconteceu com o meu excel baixei algumas planilhas interessante da internet abri ela e depois quando percebi sumiu tudo as opção de menus,ferrementas… abri visual basic inseri o s codigos e apliquei mas nao aconteceu nada antes salvei uma planilha habilitada para macro.

    Alguém pode me ajudar?

    • Marcos Rieper disse:

      Olá,

      Elas devem estar com códigos para ocultar as guias e planilhas, use este código abaixo para resolver o problema:

      Sub lsDesligarTelaCheia()
      ‘Reexibe os menus
      Application.ExecuteExcel4Macro “SHOW.TOOLBAR(“”Ribbon””,True)”

      ‘Reexibir a barra de fórmulas
      Application.DisplayFormulaBar = True

      ‘Reexibir a barra de status, disposta ao final da planilha
      Application.DisplayStatusBar = True

      ‘Reexibir o cabeçalho da Pasta de trabalho
      ActiveWindow.DisplayHeadings = True

      ‘Retornar o nome do Excel
      Application.Caption = “”

      With ActiveWindow
      ‘Reexibir barra horizontal
      .DisplayHorizontalScrollBar = True

      ‘Reexibir barra vertical
      .DisplayVerticalScrollBar = True

      ‘Reexibir guias das planilhas
      .DisplayWorkbookTabs = True

      ‘Reexibir os títulos de linha e coluna
      .DisplayHeadings = True

      ‘Reexibir valores zero na planilha
      .DisplayZeros = True

      ‘Reexibir as linhas de grade da planilha
      .DisplayGridlines = True
      End With
      End Sub

  10. Lucas Souza disse:

    Acho que o que o Everton quis dizer é que a tela cheia funciona perfeitamente na plan1 mas na plan2 os cabeçalhos aparecem. Como se a tela cheia não estivesse 100% funcional. comigo acontece a mesma coisa

    • Lucas Souza disse:

      Aproveitando, meu código VBA esta dando erro de compilação “sub ou function não definidas” … usei este código …
      ‘Chama o procedimento de tela cheia ao abrir a pasta de trabalho
      Private Sub Workbook_Open()
      lsLigarTelaCheia
      End Sub

      ‘Desliga o modo de tela cheia ao fechar a pasta de trabalho
      Private Sub Workbook_Close()
      lsDesligarTelaCheia
      End Sub

  11. USSACA disse:

    Bom dia professor Marcos.
    O meu excel 2013 desabilitou o botão direito mouse para exibir e ocultar a planilha. Como faço para habilitar? Por favor.

  12. João Pedro disse:

    Marcos, td bem?
    Existe alguma maneira de o código de “reexibir” seja executado quando clico em restaurar tamanho ou minimizar pasta de trabalho? Estou executando o código “ocultar” dentro do evento open workbook!

    Obrigado!

  13. kleber ramos disse:

    Os códigos foram muito bem , porem quando abro mais de uma planilha as outras também ocultam as barra de ferramentas .
    Como faço para apenas a planilha que contem os códigos fique oculta e as outras abram normalmente com as abas visíveis

  14. Roger Oliveira disse:

    Olá!

    Comigo não funcionou, certamente porque não sei mexer com VBA ainda, mas desejo muito porque do restante eu domino muito bem! Aparece uma mensagem para mim:

    Os recursos a seguir não podem ser salvos em pastas de trabalho sem macro:

    * Projeto do VB

    Para salvar um arquivo com esses recursos, clique em Não e escolha um tipo de arquivo habilitado para macro na lista Tipo de Arquivo.
    Para continuar salvando como pasta de trabalho sem macro, clique em Sim.

    [Sim] [Não] [Ajuda]

  15. armando disse:

    boa tarde tem como desabilitar toda barra superior onde tem o x de fechar?

  16. Prezado Marcos Rieper, boa tarde!

    Por gentileza, poderia me auxiliar no meu caso?! Utilizei os comandos descritos nesta página para ocultar todos os menus da planilha que estou utilizando. Ocorre, que preciso editar novamente a planilha, mas não tenho acesso aos menus do Excel.

    Li toda sua página para tentar entender como eu poderia fazer “use este código abaixo para resolver o problema” mas não entendi, infelizmente.

    Poderia me ajudar como posso executar esses códigos. Existe algum comando (atalho de teclado)?

    Agradeço antecipadamente,
    Atenciosamente,
    Altair Siqueira

  17. Raphael disse:

    Ola Marcos,
    Executei a macro uma vez e deu certo, mas foi colocando outras macros na planilha e agora quando ela inicia não fica em tela Cheia, somente se eu executar a macro através de um botão, sabe o que pode ser?

  18. Ricardo Mazzarioli disse:

    Bom dia!

    Marcos, tudo bom?
    Apliquei as fórmulas em uma pasta de trabalho minha, entretanto está aparecendo Erro 91 na linha dos comandos relativos às barras de rolagem horizontal e vertical. Há alguma solução para este problema?
    Abraços!

  19. carlos disse:

    Boa Tarde

    Cara fiz exatamente como escrito.. e deu tudo certo..
    Porém ao executar o codigo algumas vezes a barra de formulas não oculta… e o código esta correto, o que será?

  20. Willian disse:

    Como faço para apenas a planilha que contem os códigos fique oculta e as outras abram normalmente com as abas visíveis

    • Marcos Rieper disse:

      Bom dia Willian,

      Você quer fazer isso com VBA? Use o código abaixo:

      Public Sub lsOcultar()
      Sheets(“Planilha1”).Visible = False
      End Sub

      Public Sub lsReexibir()
      Sheets(“Planilha2”).Visible = True
      End Sub

  21. Marco Pereira disse:

    Boa tarde amigos!

    Inseri as macros e elas funcionaram perfeitamente, mas quando salvo em tela cheia e fecho o arquivo e abro novamente ele não inicia em tela cheia, tem como resolver essa questão?

  22. Tiago Mercês disse:

    Temos como ocultar a barra que fica o “Minimizar, maximizar e fechar” ?

  23. Maikon Feba disse:

    Olá, Marcos Rieper

    Por favor, poderia me ajudar?

    Inseri a macro, porém quando envio o arquivo para uma pessoa ela abre e a macro não funciona no computador dela.

    Tem como resolver? para enviar o arquivo e todos que abrirem o arquivo aparecer neste modo de tela cheia?

    Obrigado.

  24. José Roberto disse:

    Parabéns, funcionou perfeitamente. Ajudou pra caramba, mto obrigado!!!

  25. Douglas Oliveira disse:

    Ola amigo, primeiramente gostaria de agradecer pelo código… segundo que vai para o pessoal que quer que o comando funcione somente em uma pasta de trabalho… precisa-se manipular a instancia do excel usando o código abaixo funciona…

    Sub Abrir Ocultando

    ‘Definir variavel para aplicação do excel…
    dim ExcelApp as Excel.Application

    ‘abrir excel em uma nova e unica instancia
    set ExcelApp = new Excel.Application

    ‘Abrir planilha que deseja aplicar o código
    ExApp.Workbooks.open “C:\CaminhodoArquivo\NomedoArquivo.xslx”

    ‘Para que os comandos sejá realizado na planilha aberta use no lugar de Application a variavel que recebeu _
    a nova instancia

    ‘Exemplo: vou ocultar a barra de ferramentas …
    ExcelApp.ExecuteExcel4Macro “SHOW.TOOLBAR(“”Ribbon””,False)”

    ‘PErceba que troquei o comando Application.ExecuteExcel4Macro “SHOW.TOOLBAR(“”Ribbon””,False)” _
    e no lugar de application usei a variavel ExcelApp

    end sub

  26. Matheus Duarte disse:

    Olá Marcos.
    Muito obrigado por disponibilizar essas informações, com certeza esse é o melhor site de Excel que temos.

    A fórmula funcionou muito bem, é exatamente o que eu buscava.
    Entretanto quando alterno entre outras planilhas (“guias”), os títulos estão exibidos.
    Em outras palavras, o comando VBA só oculta os títulos (linhas e colunas) da planilha inicial, as outras planilhas da pasta de trabalho continuam com os títulos exibidos.

    Sabe como faço para ocultar os títulos em todas as planilhas da pasta de trabalho?

    Obrigado

  27. Carlos Araújo disse:

    Marcos, bom dia! Estou trabalhando numa Planilha de Controle Financeiro e esse código é o que faltava para finalizá-la. Muito Obrigado.
    Gostaria de tirar uma dúvida, se possível:
    – Mesmo após aplicar o “lsDesligarTelaCheia”, continuo sem conseguir selecionar uma Range de Coluna/Linha de forma manual. Apenas via VBA, consigo que uma Range seja selecionada. Ex: Quero selecionar toda a coluna B de uma Plan1 ou selecionar toda a linha 2 de uma Plan1. Não consigo. Percebi esse problema, pois um dos códigos que a minha Planilha executa, é recortar uma Range de duas colunas e cola-las em outra Range. E aí dava erro ao colar essas colunas, mas resolvi o problema mudando o código de recortar para inserir colunas (pois vba, funciona, mas colar não pois perde a seleção.), e aí fazendo copy/paste.
    Mas sem ser por VBA, nada feito para conseguir selecionar uma Range, mesmo com o “lsDesligarTelaCheia” aplicado.
    Pode me auxiliar?
    Abs e Parabéns pelo código.

  28. Claudio disse:

    Boa tarde,

    Usei o código para fazer uma apresentação e tive que colocar botões e hiperlink nos mesmos, para chamar outras abas, fiz um menu. Porém, estas outras abas vem com a barra de títulos visível. O que devo fazer pra ficar todas sem aparecer a barra?

  29. Expedito disse:

    Não estou conseguindo que a p-lanilha ja abra diretamente em tela cheia alguem pode me ajudar?

  30. OMAR PEDRO disse:

    OLA MARCOS !!!

    COMO FAÇO PARA MUDAR A IMAGEM DE ABERTURA DO EXCEL ?

  31. Danilo Sergio disse:

    Mesmo com pouco conhecimento em marco e VBA consegui utilizar esse codigo, porem quando abro o arquivo ele fica tela cheia ai abro outro arquivo e esse arquivo abri normal com todas as barra ate ai ok é oque eu preciso, mais quando volto para a pasta de trabalho com o codigo a barra de formula volta aparecer apenas ela, oque sera que acontece?

  32. Nayara disse:

    Boa tarde!

    O código funcionou, porém preciso quando executo a macro gostaria que fossem inseridas algumas linhas, para que as informações fiquem “centralizadas” quando for colocar em tela cheia, e preciso que isso seja feito em todas as abas da planilha. É possível?

  33. Dario Silva disse:

    Professor parabéns ótimo código.

    Porém creio que a questão com a situação:
    O arquivo com a macro está “afetando” outros arquivos “Planilhas” Excel que não deveriam estar como “tela cheia”. por gentileza como resolver esta questão?. me considero em nível básico em VBA e estou aprendendo muito por aqui. Obrigado até aqui.

  34. maik disse:

    Funcionou perfeitamente, todavia ao abrir o arquivo com a programação, todas as planilhas abertas anteriormente sofrem a mesma programação (em tela cheia).
    Gostaria de aplicar somente em um arquivo em específico, não alterando os anteriores? Como faço? ser

  35. Renato de Moura disse:

    Boa tarde Marco,

    Primeiramente, parabéns pelo código disponibilizado.
    Tenho o seguinte cenário, estou usando um código para auto ajuste da largura das colunas na planilha, tanto para tabelas comuns como para tabelas dinâmicas. (Private Sub Worksheet_SelectionChange(ByVal Target As Range) Worksheets(“Lançamentos”).Columns(“C:L”).AutoFit
    End Sub.
    Na planilha, tenho a necessidade de ocultar fórmulas e bloquear algumas células, para que o usuário não faça nenhuma alteração. Feito os procedimentos de bloquear e ocular, os códigos das tabelas dinâmicas estão apresentando o erro 1004. Se desbloqueio a planilha, o erro não ocorre.
    Teria algum procedimento para resolver essa questão ?

    Desde já agradeço

  36. Jefferson disse:

    Gostaria de saber, como faz para ao abrir o arquivo já esteja ocultado barras, guia e ferramentas, sem precisar clicar no comando.

  37. pedro disse:

    oBRIGADO Pelas dicas:
    meu problema é, quando fecho a planilha em tela cheia… qualquer outra planilha que abro vem em tela cheia. (como se a macro Isdesligartelacheia nao executa-se ao fechar a planilha! pode me ajudar por favor!

  38. Osvaldo silva disse:

    Boa tarde,

    Eu executei o comando na planilha, funcionou perfeitamente. Porem quando abro outras planilhas as abas aparece oculta tbm.

    não consigo achar a opção ou tecla para executar o código de reexibir.

    saberiam me informar como eu faço?

    Grato

  39. Rodrigo disse:

    Olá, não sei se este tópico está ativo ainda, mas gostaria de saber como ocultar apenas algumas abas da toolbar. Gsotaria de deixar somente as que eu customizei e esconder o resto.

  40. Jose Carlos Santos Nunes Ferreira disse:

    Bom dia Marcos, muito legal seu código mas preciso de um que esconda as planilhas quando executo o form e também uma opção para que as planilhas apareçam novamente ,se não não consigo mexer caso necessário nas planilhas. Abraços e obrigado.

Deixe uma resposta

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *

Esse site utiliza o Akismet para reduzir spam. Aprenda como seus dados de comentários são processados.

Inscreva-se no nosso canal do Youtube!


Junte-se ao nosso canal do Youtube. Começamos em abril de 2016, mas já temos mais de 06:00 h de treinamentos gratuitos e este número irá aumentar. Vídeos novos todos os sábados.