FindPrevious Method

Applies To

Range Object.

Description

Continues a search started with the Find method. Finds the previous cell matching the same conditions and returns a Range object that represents that cell. Does not affect the selection or active cell.

Syntax

object.FindPrevious(after)

object

Required. The range to search.

after

Optional. The first cell before which you want to search. This corresponds to the position of the active cell when a search is done from the user interface. If omitted, the top left cell of the range is used as the starting point for the search. Remember that the search begins before this cell; the specified cell is not searched until the method wraps back around to this cell.

Remarks

When the search reaches the beginning of the specified search range, it wraps around to the end of the range. To stop a search when this wraparound occurs, save the address of the first found cell, and then test each successive found-cell address against this saved address.

See Also

Find Method, FindNext Method, Replace Method.

Example

This example shows how the FindPrevious method is used with the Find and FindNext methods. Before running this example, make sure that Sheet1 contains at least two occurrences of the word Phoenix in column B.


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