Note: The other languages of the website are Google-translated. Back to English

Como navegar entre as planilhas usando a lista suspensa do Excel?

Supondo que você tenha uma pasta de trabalho que contém várias planilhas, agora, você precisa criar uma lista suspensa ou caixa de combinação que lista todos os nomes de planilha e quando você seleciona um nome de planilha na lista suspensa, ele irá pular para essa planilha imediatamente. Este artigo, vou apresentar como navegar entre as planilhas usando uma lista suspensa no Excel.

Navegue entre as planilhas usando a lista suspensa do Excel


Navegue entre as planilhas usando a lista suspensa do Excel

Para pular para cada folha selecionada usando uma lista suspensa, siga as seguintes etapas:

1. Clique Desenvolvedor > inserção > Caixa de combinação (controle ActiveX), veja a captura de tela:

2. Em seguida, arraste o mouse para desenhar uma caixa de combinação e, a seguir, clique com o botão direito do mouse e selecione Ver código no menu de contexto, veja a captura de tela:

3. No aberto Microsoft Visual Basic para Aplicações janela, copie e cole o seguinte código para substituir o código original, veja a captura de tela:

Código VBA: navegue entre as planilhas usando a lista suspensa

Private Sub ComboBox1_Change()
'Updateby Extendoffice
    If ComboBox1.ListIndex > -1 Then Sheets(ComboBox1.Text).Select
End Sub
Private Sub ComboBox1_DropButtonClick()
    Dim xSheet As Worksheet
    On Error Resume Next
    Application.ScreenUpdating = False
    Application.EnableEvents = False
    If ComboBox1.ListCount <> ThisWorkbook.Sheets.Count Then
        ComboBox1.Clear
        For Each xSheet In ThisWorkbook.Sheets
            ComboBox1.AddItem xSheet.Name
        Next xSheet
    End If
    Application.EnableEvents = True
    Application.ScreenUpdating = True
End Sub
Private Sub ComboBox1_GotFocus()
    If ComboBox1.ListCount <> 0 Then ComboBox1.DropDown
End Sub

4. Em seguida, salve e feche esta janela de código e clique em Modo de design para desligar o modo de design, agora, ao selecionar um nome de folha da caixa de combinação, ele irá para essa folha de uma vez, veja a imagem:


Navegue entre as planilhas usando hiperlinks ou botões:

Com Kutools for Excel's Criar lista de nomes de planilhas utilitário, você pode listar rapidamente todos os nomes de planilhas em uma nova planilha com hiperlinks ou botões de macro, então você pode navegar entre eles conforme sua necessidade.

Kutools for Excel: com mais de 300 suplementos úteis do Excel, grátis para testar sem limitação em 30 dias. Baixe e teste grátis agora!


As melhores ferramentas de produtividade para escritório

O Kutools for Excel resolve a maioria dos seus problemas e aumenta sua produtividade em 80%

  • armadilha para peixes: Insira rapidamente fórmulas complexas, gráficos e qualquer coisa que você tenha usado antes; Criptografar células com senha; Criar lista de discussão e enviar emails ...
  • Barra Super Fórmula (edite facilmente várias linhas de texto e fórmula); Layout de leitura (ler e editar facilmente um grande número de células); Colar na faixa filtrada...
  • Mesclar células / linhas / colunas sem perder dados; Dividir o conteúdo das células; Combinar linhas / colunas duplicadas... Evite células duplicadas; Comparar intervalos...
  • Selecione Duplicado ou Único Linhas; Selecione linhas em branco (todas as células estão vazias); Super Find e Fuzzy Find em muitos livros; Seleção aleatória ...
  • Cópia exata Várias células sem alterar a referência da fórmula; Criação automática de referências para várias folhas; Inserir marcadores, Caixas de seleção e mais ...
  • Extrair Texto, Adicionar texto, remover por posição, Remover Espaço; Criar e imprimir subtotais de paginação; Converter entre conteúdo de células e comentários...
  • Super Filtro (salvar e aplicar esquemas de filtro a outras planilhas); Classificação Avançada por mês / semana / dia, frequência e mais; Filtro Especial por negrito, itálico ...
  • Combine pastas de trabalho e planilhas; Mesclar tabelas com base em colunas-chave; Divida os dados em várias folhas; Conversão em lote de xls, xlsx e PDF...
  • Mais de 300 recursos poderosos. Suporta Office / Excel 2007-2019 e 365. Suporta todos os idiomas. Fácil implantação em sua empresa ou organização. Teste gratuito de 30 dias com recursos completos. Garantia de devolução do dinheiro em 60 dias.
guia kte 201905

Guia do Office 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!
parte inferior da aba do escritório
Comentários (12)
Ainda não há classificações. Seja o primeiro a avaliar!
Este comentário foi feito pelo moderador no site
Como posso ativar a planilha oculta e ocultar a página inicial?
Este comentário foi feito pelo moderador no site
Como posso adicionar apenas planilhas específicas? e nem todas as planilhas da pasta de trabalho
Este comentário foi feito pelo moderador no site
Você teve algum código de busca de alegria para mostrar apenas algumas planilhas na caixa suspensa?
Este comentário foi feito pelo moderador no site
Como você altera isso para mostrar/selecionar apenas planilhas visíveis?
Este comentário foi feito pelo moderador no site
Oi,
Para ignorar as planilhas ocultas da lista suspensa e manter apenas as planilhas visíveis, o seguinte código VBA pode ajudá-lo:

Private Sub ComboBox1_Change()
'Atualizar por Extendoffice
Se ComboBox1.ListIndex > -1 Then Sheets(ComboBox1.Text). Selecione
End Sub
Private Sub ComboBox1_DropButtonClick()
Escurecer xSheet como planilha
On Error Resume Next
Application.ScreenUpdating = False
Application.EnableEvents = False
If ComboBox1.ListCount <> ThisWorkbook.Sheets.Count Then
ComboBox1.Limpar
Para cada xSheet nesta pasta de trabalho.Planilhas
Se xSheet.Visible Then
ComboBox1.AddItem xSheet.Name
Se acabar
Próximo xSheet
Se acabar
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub
Private Sub ComboBox1_GotFocus()
Se ComboBox1.ListCount <> 0 Then ComboBox1.DropDown
End Sub

Por favor, tente, espero que possa ajudá-lo!
Este comentário foi feito pelo moderador no site
Funcionou! Obrigada! Você sabe se esse código causará problemas se as planilhas forem renomeadas ou atualizará a lista automaticamente?
Este comentário foi feito pelo moderador no site
Olá,
O código acima funciona bem ao renomear o nome da planilha e os itens na lista suspensa serão atualizados automaticamente.
Você pode experimentá-lo.
Este comentário foi feito pelo moderador no site
obrigado pelo seu código. Funciona para alternar planilhas diferentes com base na lista suspensa.
Mas tenho várias perguntas.
1. depois de processar a planilha relacionada e desejar voltar ao menu principal (com a lista suspensa da planilha), como poderia fazer sem usar o mouse?
2. Ao abrir o arquivo, gostaria que o menu principal (com lista suspensa) fosse padrão. Então eu poderia começar a partir deste menu
obrigado
rosa
Este comentário foi feito pelo moderador no site
oi lá,
Muito obrigado pelo código que cria uma caixa de combinação dinâmica para navegar nas planilhas. Infelizmente tive um erro. Depois de navegar em algumas planilhas, o arquivo fecha automaticamente. Nem sequer mostra qualquer mensagem de erro. Não consegui descobrir o motivo. eu agradeço a ajuda
obrigado
Este comentário foi feito pelo moderador no site
mesmo erro também, você descobriu?
Este comentário foi feito pelo moderador no site
oi, é possível combinar várias opções de diferentes menus suspensos e abrir planilhas de acordo.

por exemplo: se Option1 do dropdown1 estiver selecionado e Option2 do dropdown2 estiver selecionado, apenas a Sheet2 será aberta
Este comentário foi feito pelo moderador no site
A lista suspensa não abre planilhas ocultas, é capaz de abrir planilhas ocultas?
Não há comentários postados aqui ainda
Deixe o seu comentário
Postando como convidado
×
Avalie esta postagem:
0   Personagens
Locais sugeridos