Método Range.FindPrevious (Excel)
Continua uma pesquisa iniciada com o método Find . 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
expressão. 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 | Variantes | 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 dessa célula; a célula especificada não é pesquisada até que o método seja encapsulado novamente para essa célula. Se esse argumento não for especificado, a pesquisa será iniciada antes da célula superior esquerda no 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, verifique se o Sheet1 contém pelo menos duas ocorrências da palavra Phoenix 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.