Método Range.FindPrevious (Excel)

Continua uma pesquisa iniciada com o método Localizar . Localiza a célula anterior que coincida com as mesmas condições e retorna um objeto Range representando essa célula. Não afeta a seleção ou a célula ativa.

Sintaxe

mais simples. FindPrevious (Antes)

expressão Uma variável que representa um objeto de Intervalo.

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Before Opcional Variant A célula antes da qual você deseja pesquisar. Isso corresponde à posição da célula ativa quando uma pesquisa é feita desde a interface do usuário. Observe que Antes deve ser uma única célula no intervalo.

Lembre-se de que a pesquisa começa antes desta célula; A célula especificada não é pesquisada até que o método seja encapsulado novamente nessa célula. Se esse argumento não for especificado, a pesquisa será iniciada antes da célula superior esquerda do intervalo.

Valor de retorno

Intervalo

Comentários

Quando a pesquisa chega ao início do intervalo de pesquisa especificado, ela continua a partir do final do intervalo. Para parar uma pesquisa quando isso acontecer, salve o endereço da primeira célula encontrada e então teste cada endereço de célula sucessivo encontrado em relação a esse endereço salvo.

Exemplo

Este exemplo mostra como o método FindPrevious é usado com os métodos Find e FindNext. Antes de executar este exemplo, certifique-se de que a Planilha1 contenha pelo menos duas ocorrências da palavra Fênix na coluna B.

Sub FindTest() 
 Dim fc As Range 
 Set fc = Worksheets("Sheet1").Columns("B").Find(what:="Phoenix") 
 MsgBox "The first occurrence is in cell " & fc.Address 
 Set fc = Worksheets("Sheet1").Columns("B").FindNext(after:=fc) 
 MsgBox "The next occurrence is in cell " & fc.Address 
 Set fc = Worksheets("Sheet1").Columns("B").FindPrevious(after:=fc) 
 MsgBox "The previous occurrence is in cell " & fc.Address 
End Sub

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.

  • Last updated on