one way. Didn't test
lri=cells(rows.count,"i").end(xlup).row+1
lrh=cells(rows.count,"h").end(xlup).row
range(cells(lri,"i"),cells(lrh,"i")=date

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"mikerobe" wrote in message
...
Hi
I have recently asked a similar question but having thought about it
there may be an easier solution to what i want. I have a worksheet
where rows of data are added daily. The data goes to column H
inclusive. I would like to add todays date to column "I" when data is
added. So I was guessing it might be possible to create a macro to add
that days date based on the fact that if Column "I" is blank down as
far as there is data in column H. This would then build up a new
column "Date data added".

Can anyone help me with code for this?

Much appreciated

Eddie