Matching a value to a column, (rounding) and returning offset column value

Hi,

Do you really need a macro. With your chosen number in say D1 then

Formula:

=INDEX(B:B,MATCH(D1,A:A,1)+1,1)

will give you your answer. If you really do need a macro then just tuck this formula away somewhere and read the cell value directly into your VBA variable.