vba excel match whole numbers

[terriertrip]

I want to evaluate and match one range with another and return the offset value of the other. My issue is that both ranges may contain decimals that will not be identical; however, the ordinary whole number will match. I was wondering if there was a way to evaluate (pseudocode) Application.WorksheetFunction.Round(.Range("D2:D" & sRow), 0) without having to create a worker range. Also there are multiple whole number values (different decimals) so only returning the first match.

ws1[A] ws2[D] ws2[A]
1000.42
1001.1 1001.02 1005 <--------- match
1001.34 1006
1001.90 1007
1002.7 1002.27 1008 <--------- match
...
2003.90 2043
2004.3 2004.10 2044 <--------- match
2004.83 2045
...
3000 3000.3 3100 <--------- match
...

[mjr veverka]

Maybe it's about:

1. vba function "Fix"
or equivalent in worksheet
2. functions "Trunc" and "Sign" (an example in the attachment)

?

[terriertrip]

Thanks porucha, but i went a different direction and was able to figure it out. Thanks for the reply.