Find first value that equals 0 or less and return the cell address

Hi

Is there an easy way in vba to identify the first instance of a 0 or less value in a column and return its cell address in the Cell(x,x) notation.

I need to grab a value that is offset from here and use it on another sheet in a date calculation.

Thanks in advance