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
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência sem igual. 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...
Office Tab traz interface de abas para o Office e facilita muito 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 da mesma janela, em vez de novas janelas.
- Aumente sua produtividade em50% e reduza centenas de cliques do mouse todos os dias!