Automatically add date to a specific column

[Guest]

Happy holidays everyone,

Through the help of many of you I've been able to crate a very useful series
of spreadsheets for tracking our current and previous user information for
our company.

My question todays delas with automatically adding the current date to a
specific row when a record has been copied to the worksheet. An example
would be:

I have a routine that will copy a row from our "Current Users" worksheet to
next blank row in our "Previous Users" worksheet. The rows copied are always
A. When the row is added to the "Previous Users" I want to automatically
have the date put in Row Q. Any help would be greatly appreciated.

Coyote

 

[Frank Kabel]

hi
see:
http://www.mcgimpsey.com/excel/timestamp.html

 

[JE McGimpsey]

One way:

Add this to your routine (change your destination sheet name to suit):

With Sheets("Dest").Cells(Rows.Count, "P").End(xlUp).Offset(0, 1)
.NumberFormat = "dd mmm yyyy"
.Value = Date
End With