Como encontrar e obter o valor da primeira célula visível após a filtragem no Excel?
Em alguns casos, pode ser necessário obter o valor da primeira célula visível em uma lista filtrada. Como fazer isso? Este artigo mostrará métodos para resolver esse problema.
Encontre e obtenha o valor da primeira célula visível após a filtragem com fórmula de matriz
Encontre e obtenha o valor da primeira célula visível após a filtragem com VBA
Encontre e obtenha o valor da primeira célula visível após a filtragem com fórmula de matriz
Você pode usar a seguinte fórmula de matriz para recuperar o valor da primeira célula visível em uma lista filtrada. Por favor, faça o seguinte.
1. Selecione uma célula em branco para colocar o primeiro valor visível, insira a fórmula abaixo nela e pressione simultaneamente as teclas Ctrl + Shift + Enter.
=ÍNDICE(C2:C19,MÍNIMO(SE(SUBTOTAL(3;DESLOC(C2;LIN(C2:C19)-LIN(C2);0));LIN(C2:C19)-LIN(C2)+1)))
Observação: Na fórmula, C2:C19 é a lista filtrada da qual você deseja retornar o valor da primeira célula visível, C2 é a primeira célula da lista. Você pode alterá-los conforme necessário.
Então você poderá ver o valor da primeira célula visível na lista filtrada preenchido na célula selecionada, como mostrado na captura de tela acima.
Encontre e obtenha o valor da primeira célula visível após a filtragem com VBA
Além de usar a fórmula de matriz acima para obter o valor da primeira célula visível em uma lista filtrada, você pode executar o seguinte script VBA para retornar rapidamente a primeira célula visível de uma lista filtrada. Por favor, faça o seguinte.
1. Selecione uma célula em branco, como E8, para colocar o valor da primeira célula visível de uma lista filtrada.
2. Pressione simultaneamente as teclas Alt + F11 para abrir a janela do Microsoft Visual Basic for Applications.
3. Na janela do Microsoft Visual Basic for Applications, clique em Inserir > Módulo. Em seguida, copie e cole o código VBA abaixo na janela do Módulo.
Código VBA: encontre e obtenha o valor da primeira célula visível após a filtragem no Excel
Sub FirstVisibleCell()
With Worksheets("Sheet1").AutoFilter.Range
ActiveCell.Value2 = Range("C" & .Offset(1, 0).SpecialCells(xlCellTypeVisible)(1).Row).Value2
End With
End SubObservação: No código, Planilha1 é o nome da planilha que contém a lista filtrada. “C” é o nome da coluna da qual você deseja obter o primeiro valor visível. Você pode alterá-los conforme necessário.
4. Pressione a tecla F5 para executar o código, e a primeira célula visível da lista filtrada, localizada na coluna C, será preenchida na célula E8 imediatamente.
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins