Como ocultar ou reexibir uma planilha específica com base no valor da célula em outra planilha?
Existe algum método para ocultar ou reexibir uma guia de planilha específica com base no conteúdo de uma célula em outra planilha? Por exemplo, ao inserir o texto “Sim” na célula G1 da Folha2, desejo que a Folha1 fique oculta e, quando inserir “Não”, a Folha1 seja exibida imediatamente. Como posso resolver esse problema no Excel?
Ocultar ou exibir uma guia específica da planilha com base no valor da célula com o código VBA
Ocultar ou exibir uma guia específica da planilha com base no valor da célula com o código VBA
Para ocultar ou exibir uma guia de planilha específica com base em um valor de célula em outra planilha, o seguinte código VBA pode lhe fazer um favor, faça o seguinte:
1. Vá para a planilha que contém o valor da célula em que deseja ocultar outra planilha.
2. Clique com o botão direito na guia da planilha e selecione Ver código, no estalou para fora Microsoft Visual Basic para Aplicações janela, copie e cole o seguinte código na janela do módulo em branco, veja a captura de tela:
Código VBA: oculte ou oculte uma guia de planilha com base no valor da célula:
Private Sub Worksheet_Change(ByVal Target As Range)
If [G1] = "Yes" Then
Sheets("Sheet1").Visible = True
Else
Sheets("Sheet1").Visible = False
End If
End Sub
Nota: No código acima, G1 e Sim são a célula e o conteúdo da célula em que você deseja se basear, e Sheet1 é a página específica que você deseja ocultar ou exibir. Você pode alterá-los conforme sua necessidade.
3. Em seguida, salve e feche este código, ao inserir “Não” ou outro texto na célula G1, a Planilha1 ficará oculta, mas se você inserir “Sim” na célula, a Planilha1 será exibida imediatamente, veja as capturas de tela:
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!