What I sent is NOT a formula. It is a macro that is tested and "this mehtod
did wor".
from the active cell (where your cursor is) if you execute this macro it
will put the date in col G if your last data is in col F. Is that what you
want?

--
Don Guillett
SalesAid Software

"marthasanchez" wrote in message
...
I did exactly the formula below and this mehtod did noe wor?

"Don Guillett" wrote:

try this idea. Change activecell.row to suit your code

Sub dateinlastcol()
Cells(ActiveCell.Row, Columns.Count) _
..End(xlToLeft).Offset(, 1) = Date
End Sub
--
Don Guillett
SalesAid Software

"marthasanchez" wrote in
message
...
In VBA EXcel, I have a report that will list data. The number of
records
will
be different everytime I run the report. I want to add a column at the
end
of
the report to show today's date. How do I do this to correspond with
the
number of records?