Como abrir uma planilha selecionando seu nome em uma caixa de combinação no Excel?
Suponha que você tenha uma Caixa de Combinação na sua pasta de trabalho do Excel contendo uma lista de todos os nomes de planilhas. Você quer abrir uma planilha específica selecionando seu nome na Caixa de Combinação. Este guia demonstra como fazer isso usando código VBA, com etapas para preencher a Caixa de Combinação com nomes de planilhas e habilitar a funcionalidade desejada.
Abra uma planilha selecionando seu nome em uma caixa de combinação com código VBA
Abra uma planilha selecionando seu nome em uma caixa de combinação com código VBA
O código VBA abaixo pode ajudá-lo a ir para uma planilha específica com base na seleção da caixa de combinação no Excel. Faça o seguinte.
Note: Se a Caixa de combinação não contiver nenhum nome de planilha em sua planilha, siga a dica abaixo para adicionar rapidamente todos os nomes de planilhas a essa Caixa de combinação. Se uma Caixa de combinação contendo todos os nomes de planilhas já existir, prossiga diretamente para step 1.
Dica: Insira um Botão de Comando 1 em sua planilha, clique com o botão direito e selecione Ver código no menu do botão direito. Em seguida, copie e cole o código VBA abaixo no Code janela e pressione o outro + Q chaves para fechar o Microsoft Visual Basic para aplicativos janela. Clique no botão de comando inserido e todos os nomes de planilhas da pasta de trabalho atual serão adicionados ao ComboBox1 automaticamente.
Código VBA: adicione facilmente todos os nomes de planilhas em uma caixa de combinação
Private Sub CommandButton1_Click()
Me.ComboBox1.Clear
Dim strWs As String
Dim i As Integer
For i = 1 To ThisWorkbook.Sheets.Count
Me.ComboBox1.AddItem Sheets(i).Name
Next
End Sub
Se já houver uma caixa de combinação contendo todos os nomes das planilhas, faça o seguinte.
1. Ligar o Modo de design sob a Developer aba.
2. Clique com o botão direito na caixa de combinação com os nomes das planilhas e clique em Ver código no menu do botão direito.
3. Então o Microsoft Visual Basic para Aplicações janela for exibida, substitua o código VBA original na janela Código pelo código VBA abaixo.
Código VBA: abre uma planilha específica pelo valor selecionado da caixa de combinação
Private Sub ComboBox1_Change()
Dim actWsh As String
actWsh = ComboBox1.Text
Worksheets(actWsh).Select
End Sub
Note: no código, ComboBox1 é o nome da caixa de combinação que contém os nomes das folhas.
4. aperte o outro + Q chaves para fechar o Microsoft Visual Basic para Aplicações janela e desligue o Modo de design sob a Developer aba.
Agora, selecionar qualquer nome de planilha na Caixa de Combinação abrirá automaticamente a planilha correspondente.
Liste facilmente todos os nomes de planilhas da pasta de trabalho atual no Excel:
Usar o índice de planilhas em sua pasta de trabalho ajuda a gerenciar suas planilhas com facilidade. Com o Criar lista de nomes de planilhas utilidade de Kutools for Excel, você pode criar facilmente um índice de planilha contendo todos os nomes de planilha na pasta de trabalho atual. Depois disso, você pode mudar rapidamente para uma determinada planilha clicando no nome da planilha na planilha Índice. Veja a imagem abaixo:
Kutools for Excel - Turbine o Excel com mais de 300 ferramentas essenciais. Aproveite recursos de IA permanentemente gratuitos! Get It Now
Artigos relacionados:
- Como copiar o valor da caixa de combinação para uma célula ativa no Excel?
- Como exibir o formato de data na saída da caixa de combinação no Excel?
- Como ocultar ou reexibir um botão de comando com base no valor da célula especificada no Excel?
- Como prevenir ou desabilitar a digitação em uma combo box no Excel?
- Como sair da caixa de combinação para selecionar uma célula específica no Excel?
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!