If you are always searching column A for the first match and column
for the seconds, use:


Code
-------------------
Sub FindMatch()

Dim r As Range
Dim iMax As Long
Dim strReturn As String

iMax = Range("A65536").End(xlUp).Row

For Each r In Range("A1:A" & iMax)
If r.Value = "First Search Criteria" Then
If Cells(r.Row, 7).Value = "Second Search Criterea" Then
strReturn = Cells(r.Row, 10).Value 'Assumes last column is column 10
End If
End If
Next

MsgBox "Found: " & strReturn

End Su
-------------------

There's a lot of assumptions, repost to clarify if this doesn't work.

K

Note: Untested

--
Message posted from http://www.ExcelForum.com