var = 21

set rng = Cells(rows.count,1).End(xlup)(2)

rng.Value = var


Change the 1 in Cells( ,1) to the column where you want the value.

Regards,
Tom Ogilvy


"josh" wrote in message
...
this one is a little bit different this time,

i need to output a variable from vba to the next
available cell in a column in my worksheet, any help
would be much appreciated.

thanks guys
Josh