Adding date to a column in Excel

[mikerobe]

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

 

[Don Guillett]

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

 

[Sgwapt]

This is what I use

Add the field name "AddDate" to column I
The update code if using to this
ActiveCell.Offset(0,1).value = Date

ActiveCell = "H2"
0= Row
1 = Column I

If this is the direction you wanted then I believe it's becuase you want to
use filters to see what is being added to data sheet.


My data sheets have 2 fields as the last columns
AddDate
FixDate


I hope this helps.

 

[Sgwapt]

Leave it up to the guru's
Way to go Don

LOL

 

[mikerobe]

Leave it up to the guru's
Way to go Don

LOL
--
George G






- Show quoted text -

Thanks Don - Thats exactly what I wanted works perfect and only 3
lines of code! amazing. Also thanks George for your suggestion.

 

[Don Guillett]

Glad to help