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.
EXCELENTE! Muito obrigado!
ResponderExcluirAnderson
ResponderExcluirOh deu certinho cara!!!!!!
Valeu mesmo
Muito bom!!!!!!!!!!!!! a 10m anos fico clicando em uma por um, valeu mesmo John Vitor
ResponderExcluirSe 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:
ResponderExcluirSub reexibir()
Dim planilha As Worksheet
For Each planilha In Worksheets
planilha.Visible = xlSheetVisible
Next planilha
End Sub
Abs
Copie a sua macro para reexibir as planilhas ocultas. Está dando a seguinte mensagem:
ResponderExcluirErro em tempo de execução 1004. Caso vc tenha a resposta, meu email é ch.conceicao@ig.com.br. Obrigado.
Muito bom, cara! Obrigado! =]
ResponderExcluirEstou com o mesmo erro: "Erro em tempo de execução 1004." O que devo fazer?
ResponderExcluirObrigado
Muito bom!!! Valeu!
ResponderExcluirOutra variação simples:
ResponderExcluirSub Macro1()
'
' Macro1 Macro
'
For Each planilha In Worksheets
planilha.Visible = True
Next planilha
End Sub
Muito Bom! Obrigada!!!
ResponderExcluirSalvador da pátria, excelente não aguentava mais reexibir 30 planilhas uma a uma....Parabéns
ResponderExcluirNã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?
ResponderExcluirNã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?
ResponderExcluirMandou bem colego, muito obrigado!
ResponderExcluirótimo!!!
ResponderExcluirEstou a tempos tentando achar essa função. rs
Obrigada!!!
Muito bom! estão de parabéns.
ResponderExcluirGostaria 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.
ResponderExcluirjcarlosds00@hotmail.com ou jcarlosds1981@gmail.com.
obrigado
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...
ResponderExcluirParabéns e obrigado por compartilhar conhecimento.
ResponderExcluirNão consigo resolver o meu problema com essa descrição.
ResponderExcluirPoderia me ajudar
Deu certinho... bem detalhado, mesmo para mim que não conheço muito de scripts.
ResponderExcluirSensacional!! Obrigada
ResponderExcluirS-E-N-S-A-C-I-O-N-A-L, meu amigo!
ResponderExcluirObrigado!
muito bom, obrigado ajudou demais.
ResponderExcluirVALEU MARAVILHOSA DICA
ResponderExcluirObrigado me ajudou muito.
ResponderExcluirVLw cara, muito obrigado...
ResponderExcluirMelhor que achei
ResponderExcluir400 abas era p matar.
Não seria mais fácil a Microsoft adicionar um botão "Reexibir todas" na janela?
ResponderExcluirCRIEI ALGUMAS MACROS NO EXCEL E NÃO USO MAIS, QUERO EXCLUIR E NÃO CONSIGO ALGUÉM PODE ME AJUDAR
ResponderExcluirMUITO OBRIGADO!!!!!!
ResponderExcluirFantástico!
ResponderExcluirMaravilhoso! Obrigado!
ResponderExcluirOtima ajuda....
ResponderExcluirMuitissimo obrigado.
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