Find a Row

J

Jeff

I want to do a text search in column A of sheet 1. I want the ROW number
where it finds this text first to be displayed. Then I want to select the
3rd columns to the right of the row containing the text.
Is that possible in VBA ?
Jeff
 
J

Jason Morin

Sub FindIt()
Dim sfind As String
Dim rownum As Long
sfind = "apple"
rownum = Application.WorksheetFunction. _
Match(sfind, Range("A:A"), 0)
MsgBox Cells(rownum, "D").Value
End Sub

HTH
Jason
Atlanta, GA
 
Top