Equality of a range and a double variable in VBA

I have a For loop in which I pass 2 values to 2 variables ( Origin & Destination),then I want to test the equality of a range and these variables in a array formula. Here's my code:

Please Login or Register  to view this content.

When I run this code, the answer is N/A! I think the problem lies in the equality part!
I'd appreciate any help!

There is a simple answer! I can't just use a variable in a spreadsheet! This is the way to fix this:

Please Login or Register  to view this content.