Como selecionar uma folha de cálculo específica com base no valor de uma célula noutra folha do Excel?
Suponha que tem uma validação de dados do tipo Lista suspensa contendo todos os nomes das folhas de cálculo e pretende selecionar ou saltar automaticamente para a folha correspondente com base no nome escolhido na lista. O que pode fazer? E se quiser saltar automaticamente para uma determinada folha após introduzir o respetivo nome numa célula específica? Este artigo mostra-lhe vários métodos para o conseguir.
Selecionar folha de cálculo específica com base na seleção Lista suspensa com código VBA
Selecionar folha de cálculo específica com base no valor de uma célula com código VBA
Criar facilmente um índice de folhas e mudar para uma folha específica com Kutools para Excel
Selecionar folha de cálculo específica com base na seleção Lista suspensa com código VBA
Por exemplo, se uma lista suspensa estiver localizada na célula A2 da Folha8, pode executar o código VBA abaixo para selecionar ou saltar automaticamente para a folha de cálculo correspondente assim que o nome da folha for escolhido na lista suspensa.
1. Prima Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.
2. Na janela Microsoft Visual Basic for Applications, clique duas vezes no nome da folha (a folha de cálculo que contém a lista suspensa a partir da qual irá selecionar os nomes das folhas) na barra à esquerda e copie e cole o seguinte código VBA na janela Código.
Código VBA: Selecionar folha de cálculo específica com base na seleção Lista suspensa
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not (Application.Intersect(Range("A2"), Target) Is Nothing) Then _
ThisWorkbook.Sheets(Target.Value).Activate
End SubNota: Pode substituir “A2” pela sua própria célula.
3. Prima simultaneamente as teclas Alt + Q para fechar a janela Microsoft Visual Basic for Applications.
A partir de agora, sempre que selecionar um nome de folha na lista suspensa da Folha8, essa folha de cálculo será automaticamente escolhida.
Desbloqueie a Magia do Excel com KUTOOLS AI
- Execução Inteligente: Realize operações em células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
- fórmulas personalizadas: Crie fórmulas personalizadas para simplificar os seus fluxos de trabalho.
- Programação VBA: Escreva e implemente código VBA com facilidade.
- Interpretação de Fórmulas: Compreenda facilmente fórmulas complexas.
- Tradução de Texto: Elimine barreiras linguísticas nas suas folhas de cálculo.
Selecionar folha de cálculo específica com base no valor de uma célula com código VBA
Se pretender saltar para uma determinada folha de cálculo após introduzir o seu nome numa célula (por exemplo, a célula A1 na Folha1), experimente o seguinte código VBA.
1. Prima Alt+F11para abrir a janela Microsoft Visual Basic for Applications.
2. Na janela Microsoft Visual Basic for Applications, clique duas vezes no nome da folha (a folha de cálculo onde irá inserir o código VBA) na barra à esquerda e copie e cole o seguinte código na janela Código. Veja a imagem:
Código VBA: selecionar folha de cálculo específica com base no valor de uma célula
Sub ActivateSheetsByValue()
On Error Resume Next
ThisWorkbook.Sheets(Worksheets("Sheet1").Range("A1").Value).Activate
End Sub
3. Regresse à folha de cálculo, introduza na célula A1 o nome da folha que pretende selecionar, ative a janela do código e prima F5 para executar o código.
Se a célula A1 da Folha1 contiver o valor «Folha8», o código VBA fará com que salte imediatamente para a Folha8 após a sua execução.
Criar facilmente um índice de folhas e mudar para uma folha específica com Kutools para Excel
Se pretender apenas selecionar ou saltar rapidamente para uma folha de cálculo específica, experimente a funcionalidade Criar Tabela de Vínculo do Kutools para Excel. Com esta funcionalidade, cria facilmente um índice de folhas e salta rapidamente para a folha pretendida com um simples clique no respetivo nome.
1. Clique em KUTOOLS PLUS > Folha de cálculo > Criar Tabela de Vínculo. Veja a imagem:
2. Na caixa de diálogo Criar Tabela de Vínculo, selecione a opção Criar Hiperlinks na secção Estilo; introduza um nome para o seu índice de folhas na caixa Nome da Tabela de Vínculo; escolha Antes de todas as folhas em Inserir o Índice de Folhas na lista suspensa. Depois, clique no botão OK.
Nota: ao marcar a opção Criar Botões e Macros, obtém um índice de folhas com um botão de macros. Veja a imagem:
Na folha Índice, basta clicar no nome da planilha pretendida para aceder automaticamente a essa folha de cálculo.
Se pretender experimentar gratuitamente esta utilidade durante 30 dias, clique para a transferir e, em seguida, siga os passos indicados acima.
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos