A little assistance please

[NewbieMan]

Have the following code

Range("A1").Select
Set SearchRangeA = Columns("A:A")


Dim HeadCoach As String


HeadCoach = SearchRangeA.Find(what:="Staff Member").Offset(2, 0).Select
ActiveCell.Offset(4, 0).Select

What I wish to happen is to search column A to find the cell with the string "staff member" and simply select the the range beginning 2 cells below to 4 cells below (so selecting 3 cells total)

Just drawing a blank

 

[MARK858]

Sub xxxx()
Dim SearchRangeA As Range
Set SearchRangeA = Columns("A:A")
SearchRangeA.Find(what:="Staff Member").Offset(2).Resize(3).Select
End Sub

Although I wouldn't leave all the parameters of Find to chance.

 

[NewbieMan]

this was great! thanks very much!!