Ir para o conteúdo principal

Como filtrar dados da seleção da lista suspensa no Excel?

No Excel, a maioria de nós pode filtrar dados usando o recurso Filtro. Mas, você já tentou filtrar dados da seleção da lista suspensa? Por exemplo, quando eu seleciono um item da lista suspensa, quero que suas linhas correspondentes sejam filtradas como mostrado a seguir. Neste artigo, falarei sobre como filtrar dados usando a lista suspensa em uma ou duas planilhas.

Filtre os dados da seleção da lista suspensa em uma planilha com fórmulas auxiliares

Filtre os dados da seleção da lista suspensa em duas planilhas com código VBA


Filtre os dados da seleção da lista suspensa em uma planilha com fórmulas auxiliares

Para filtrar os dados da lista suspensa, você pode criar algumas colunas de fórmula auxiliares, siga as etapas a seguir, uma por uma:

1. Primeiro, insira a lista suspensa. Clique em uma célula onde deseja inserir a lista suspensa e clique em Data > Validação de dados > Validação de dados, veja a captura de tela:

2. No estalou para fora Validação de dados caixa de diálogo, sob o Configurações guia, selecione Lista do Permitir desça e clique em botão para escolher a lista de dados em que deseja criar a lista suspensa, consulte a captura de tela:

3. E, em seguida, clique em OK botão, a lista suspensa é inserida de uma vez e escolha um item da lista suspensa e, em seguida, insira esta fórmula: = LINHAS ($ A $ 2: A2) (A2 é a primeira célula da coluna que contém o valor da lista suspensa) na célula D2 e, em seguida, arraste a alça de preenchimento para baixo até as células para aplicar esta fórmula, veja a captura de tela:

4. Continue inserindo esta fórmula: = SE (A2 = $ H $ 2, D2, "") na célula E2 e, em seguida, arraste a alça de preenchimento para baixo para preencher esta fórmula, veja a captura de tela:

Note: Na fórmula acima:A2 é a primeira célula da coluna que contém o valor da lista suspensa ,H2 é a célula onde a lista suspensa é colocada, D2 é a primeira fórmula da coluna auxiliar.

5. Em seguida, digite esta fórmula: = IFERROR (PEQUENO ($ E $ 2: $ E $ 17, D2), "") na célula F2 e arraste a alça de preenchimento para baixo até as células para preencher esta fórmula, veja a captura de tela:

Note: Na fórmula acima: E2: E17 são as células da segunda fórmula auxiliar, D2 é a primeira célula na primeira coluna de fórmula auxiliar.

6. Depois de inserir as colunas da fórmula auxiliar, você deve enviar o resultado filtrado em outro local, aplique esta fórmula: =IFERROR(INDEX($A$2:$C$17,$F2,COLUMNS($J$2:J2)),"") na célula J2 e, em seguida, arraste a alça de preenchimento de J2 para L2 e o primeiro registro dos dados com base na lista suspensa foi extraído, consulte a captura de tela:

Note: Na fórmula acima: A2: C17 são os dados originais que você deseja filtrar, F2 é a terceira coluna da fórmula auxiliar, J2 é a célula onde você deseja enviar o resultado do filtro.

7. Em seguida, arraste a alça de preenchimento até as células para exibir todos os registros filtrados correspondentes, veja a captura de tela:

8. De agora em diante, quando você selecionar um item da lista suspensa, todas as linhas com base nesta seleção serão filtradas de uma vez, consulte a captura de tela:


Filtre os dados da seleção da lista suspensa em duas planilhas com código VBA

Se a sua célula da lista suspensa na Folha1 e os dados filtrados na Folha2, ao escolher um item da lista suspensa, outra folha será filtrada. Como você poderia terminar este trabalho no Excel?

O seguinte código VBA pode lhe fazer um favor, faça o seguinte:

1. Clique com o botão direito na guia da planilha que contém a célula da lista suspensa e escolha Ver código a partir do menu de contexto, no aberto Microsoft Visual Basic para aplicativos janela, copie e cole o seguinte código no módulo em branco:

Código VBA: filtre os dados da seleção da lista suspensa em duas folhas:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
    On Error Resume Next
    If Not Intersect(Range("A2"), Target) Is Nothing Then
        Application.EnableEvents = False
        If Range("A2").Value = "" Then
            Worksheets("Sheet2").ShowAllData
        Else
            Worksheets("Sheet2").Range("A2").AutoFilter 1, Range("A2").Value
        End If
        Application.EnableEvents = True
    End If
End Sub

Note: No código acima: A2 é a célula que contém a lista suspensa, e Sheet2 é a planilha que contém os dados que você deseja filtrar. O número 1 no script: AutoFiltro 1 é o número da coluna que você deseja filtrar com base. Você pode alterá-los conforme sua necessidade.

2. A partir de agora, quando você selecionar um item da lista suspensa na Planilha1, e os dados correspondentes serão filtrados na Planilha2, consulte a captura de tela:

Melhores ferramentas de produtividade de escritório

🤖 Assistente de IA do Kutools: Revolucionar a análise de dados com base em: Execução Inteligente   |  Gerar Código  |  Crie fórmulas personalizadas  |  Analise dados e gere gráficos  |  Invocar funções do Kutools...
Recursos mais comuns: Encontre, destaque ou identifique duplicatas   |  Excluir linhas em branco   |  Combine colunas ou células sem perder dados   |   Rodada sem Fórmula ...
Super pesquisa: VLookup de múltiplos critérios    VLookup de múltiplos valores  |   VLookup em várias planilhas   |   Pesquisa Difusa ....
Lista suspensa avançada: Crie rapidamente uma lista suspensa   |  Lista suspensa de dependentes   |  Lista suspensa de seleção múltipla ....
Gerenciador de colunas: Adicione um número específico de colunas  |  Mover colunas  |  Alternar status de visibilidade de colunas ocultas  |  Compare intervalos e colunas ...
Recursos em destaque: Foco da Grade   |  Vista de Design   |   Grande Barra de Fórmula    Gerenciador de pastas de trabalho e planilhas   |  Biblioteca (Auto texto)   |  Data Picker   |  Combinar planilhas   |  Criptografar/Descriptografar Células    Enviar e-mails por lista   |  Super Filtro   |   Filtro Especial (filtro negrito/itálico/tachado...) ...
15 principais conjuntos de ferramentas12 Texto Ferramentas (Adicionar texto, Remover Personagens, ...)   |   50+ de cores Tipos (Gráfico de Gantt, ...)   |   Mais de 40 práticos Fórmulas (Calcule a idade com base no aniversário, ...)   |   19 Inclusão Ferramentas (Insira o código QR, Inserir imagem do caminho, ...)   |   12 Conversão Ferramentas (Números para Palavras, Conversão de moedas, ...)   |   7 Unir e dividir Ferramentas (Combinar linhas avançadas, Dividir células, ...)   |   ... e mais

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...

Descrição


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!
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
For me, the Formula =ROWS($A$2:A2) didn't workend! It always gave me "2" back. I had to put =ROWS($A2:A2), so without the second "$", in order to reproduce your result.
This comment was minimized by the moderator on the site
How do I add multiple drown down menus? For example,
If i wanted a drop down menu for Product and name?.
This comment was minimized by the moderator on the site
Hey Kev, wondering if you found an answer to your question here? I have been looking for a bit to no avail.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations