Reexibir Todas as Planilhas Ocultas

Hoje me deparei com o problema de ter que reexibir algumas planilhas que eu havia deixado ocultas,mas o problema é que aparentemente o Excel nos da a opção de reexibir apenas uma planilha por vez, o que daria maior trabalho no meu caso por ter varias planilhas.
A solução aparentemente mais viável seria código, abra seu Construtor de Código VBA (Alt + F11) e dê um clique duplo em "EstaPasta_de_trabalho".



Dentro do Construtor digite o seguinte código:

Sub reexibir()

Dim i As Integer
For i = 1 To 5 ' Quantidade de planilhas a ser exibida, Tem que ter no minimo uma célula ativa
Sheets(i).Visible = -1
Next i

End Sub


Lembrando que na parte do código ontem tem "For i = 1 to 5" o 5 é referente a quantidade de planilhas que vão ser reexibidas.
Execute o Código


Agora feche o Construtor e confira o resultado obtido.


35 comentários:

  1. EXCELENTE! Muito obrigado!

    ResponderExcluir
  2. Anderson
    Oh deu certinho cara!!!!!!

    Valeu mesmo

    ResponderExcluir
  3. Muito bom!!!!!!!!!!!!! a 10m anos fico clicando em uma por um, valeu mesmo John Vitor

    ResponderExcluir
  4. Se você quiser uma macro que pode ser copiada para qualquer arquivo do Excel sem precisar corrigir o número de planilhas, o código abaixo também funciona:

    Sub reexibir()

    Dim planilha As Worksheet
    For Each planilha In Worksheets
    planilha.Visible = xlSheetVisible
    Next planilha

    End Sub

    Abs

    ResponderExcluir
  5. Copie a sua macro para reexibir as planilhas ocultas. Está dando a seguinte mensagem:
    Erro em tempo de execução 1004. Caso vc tenha a resposta, meu email é ch.conceicao@ig.com.br. Obrigado.

    ResponderExcluir
  6. Estou com o mesmo erro: "Erro em tempo de execução 1004." O que devo fazer?
    Obrigado

    ResponderExcluir
  7. Outra variação simples:

    Sub Macro1()
    '
    ' Macro1 Macro
    '

    For Each planilha In Worksheets
    planilha.Visible = True
    Next planilha

    End Sub

    ResponderExcluir
  8. Salvador da pátria, excelente não aguentava mais reexibir 30 planilhas uma a uma....Parabéns

    ResponderExcluir
  9. Não estou conseguindo consta a seguinte mensagem "erro de execução 1004", lembrando que as planilhas foram ocultas com senha, porém, devido ao tempo em desuso esqueci a senha é possível reverter?

    ResponderExcluir
  10. Não estou conseguindo consta a seguinte mensagem "erro de execução 1004", lembrando que as planilhas foram ocultas com senha, porém, devido ao tempo em desuso esqueci a senha é possível reverter?

    ResponderExcluir
  11. Mandou bem colego, muito obrigado!

    ResponderExcluir
  12. ótimo!!!
    Estou a tempos tentando achar essa função. rs

    Obrigada!!!

    ResponderExcluir
  13. Muito bom! estão de parabéns.

    ResponderExcluir
  14. Gostaria de saber se tem um código que faço o inverso que esse código faz, ao invés de abrir ele feche todas as Abas da planilha.

    jcarlosds00@hotmail.com ou jcarlosds1981@gmail.com.

    obrigado

    ResponderExcluir
  15. Parabéns!!! No meu caso, tinha umas 250 Abas ocultas!!! no lugar de 5 itens eu coloquei para exibir de 100 em 100 rsrsrsrs. Show...

    ResponderExcluir
  16. Parabéns e obrigado por compartilhar conhecimento.

    ResponderExcluir
  17. Não consigo resolver o meu problema com essa descrição.

    Poderia me ajudar

    ResponderExcluir
  18. Deu certinho... bem detalhado, mesmo para mim que não conheço muito de scripts.

    ResponderExcluir
  19. S-E-N-S-A-C-I-O-N-A-L, meu amigo!
    Obrigado!

    ResponderExcluir
  20. VLw cara, muito obrigado...

    ResponderExcluir
  21. Não seria mais fácil a Microsoft adicionar um botão "Reexibir todas" na janela?

    ResponderExcluir
  22. CRIEI ALGUMAS MACROS NO EXCEL E NÃO USO MAIS, QUERO EXCLUIR E NÃO CONSIGO ALGUÉM PODE ME AJUDAR

    ResponderExcluir
  23. Muito bom, deu certo. Mas não tem um método de ele reconhecer automaticamente o número de planilhas e reexibir todas? Tive que adivinhar quantas planilhas eu tinha pra colocar o número de planilhas no código (achei que o número de planilhas no código referia ao número de planilhas ocultas, mas pelo que vi corresponde ao total de planilhas que se tem.

    ResponderExcluir