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 Sub
Observaçã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
Potencialize suas habilidades no Excel com o Kutools para Excel e experimente uma eficiência sem igual. O Kutools para Excel oferece mais de300 recursos avançados para aumentar sua produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
O Office Tab traz interface com abas para o Office e facilita muito o seu trabalho
- Habilite a edição e leitura com abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas abas na mesma janela, em vez de abrir novas janelas.
- Aumente sua produtividade em50% e reduza centenas de cliques do mouse todos os dias!