Find Row where Col is x and Val is y

[AlexanderBB]

I'm trying this
frow = .Cells.Find(What:=x.Col, _
After:=.Cells(1, KeyCol), _
lookIn:=xlValues, _
LookAt:=xlWhole, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, _
MatchCase:=False).Row

But getting Object doesn't support....

I'm wanting the the row number where Col KeyCol contains x.Col
There's only one instance of x.Col in the column.

 

[AlexanderBB]

Aah, apologies, Assumed the problem was with .Find but I was using x.Col when it should have been x.Column
So the above is working but I changed to this (seemed a bit simpler)
Set Found = .Columns(KeyCol).Find(what:=x.Column, lookIn:=xlValues, LookAt:=xlWhole)
If Not Found Is Nothing Then frow = Found.Row

The complete answer is the value in that row, in the Next column. KeyCol+1
Can that all be factored into the Find ?
Thanks.

 

[AlphaFrog]

If I understand your question, this will return the value from the cell that is one column to the right of the Found cell

If Not Found Is Nothing Then MyValue = Found.Offset(0, 1).Value

 

[AlexanderBB]

Yes it worked perfectly and much tidier than I had,
Thanks