VBA find row for double conditions

Dear all,

I would once again really appreciate your help on the following below:

I need to find the row number when two conditions are met:

1. First, find in column 23 the value x
2. Second, find in column 91 the value shop

Wheb I run the code, it doesnt work yet. Do you have any tips?

Thanks!!

If wscalc.Columns(23).Find(x, , , xlWhole)), , , xlWhole) And wscalc.Columns(91) = shop Then

r = activecell.row