Como mostrar rapidamente apenas as planilhas ativas ou selecionadas no Excel?
Se houver várias planilhas no seu livro de trabalho, e agora você deseja mostrar apenas as planilhas ativas ou selecionadas e ocultar as outras, como você pode fazer isso rapidamente sem precisar ocultá-las uma a uma manualmente?
Mostrar apenas a planilha ativa com VBA
Mostrar apenas as planilhas selecionadas com o Kutools para Excel
Mostrar apenas a planilha ativa com VBA
Aqui está um código VBA que pode ocultar rapidamente todas as planilhas, exceto a ativa.
1. Pressione as teclas Alt + F11 para exibir a janela do Microsoft Visual Basic for Applications.
2. Em seguida, clique em Inserir > Módulo e cole o seguinte código VBA na nova janela do Módulo.
VBA: Mostrar apenas a planilha ativa
Sub Macro1()
'UpdatebyKutoolsforExcel20160409
Dim xSht As Object
For Each xSht In ThisWorkbook.Sheets
If xSht.Name <> ThisWorkbook.ActiveSheet.Name
Then xSht.Visible = False
Next
End Sub
3. Clique no botão Executar ou pressione a tecla F5 para executar o VBA. Agora, somente a planilha ativa será mostrada, as outras estarão ocultas.
Mostrar apenas as planilhas selecionadas com o Kutools para Excel
Se você tiver o Kutools para Excel instalado, poderá ocultar rapidamente as planilhas inativas ou não selecionadas com um único clique.
Após instalar gratuitamente o Kutools para Excel, faça o seguinte:
Ative uma planilha ou selecione as planilhas que deseja mostrar e, em seguida, clique Kutools > Mostrar & Ocultar > Ocultar Planilhas Inativas. Veja a captura de tela:
Agora, as planilhas não selecionadas estão ocultas.
Dica: Se você quiser mostrar todas as planilhas, pode clicar Kutools > Mostrar & Ocultar > Mostrar Todas as Planilhas. Veja a captura de tela:
Artigos Relacionados
- Como ocultar linhas com base no valor da célula no Excel?
- Como criar uma lista dinâmica de nomes de planilhas no Excel?
- Como renomear planilhas com base nos valores das células no Excel?
Melhores Ferramentas de Produtividade para Office
Potencialize suas habilidades no Excel com o Kutools para Excel e experimente uma eficiência sem igual. O Kutools para Excel oferece mais de300 recursos avançados para aumentar sua produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
O Office Tab traz interface com abas para o Office e facilita muito o seu trabalho
- Habilite a edição e leitura com abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas abas na mesma janela, em vez de abrir novas janelas.
- Aumente sua produtividade em50% e reduza centenas de cliques do mouse todos os dias!