Date of entry

M

Mark

Dear Discussion Group
My supervisor wants to keep track of how much information I enter into a
spreadsheet everyday.
Is there a function so that whenever a type data into "A1", the date I did
this would appear in "A2."

Thank you,
Mark Joseph
 
M

Mark

Dear JE McGimpsey,

Thank you very much. While I can't implement the directions, someone in my
IT department can.

Gratefully,
Mark Joseph Gallagher, Jr.
 
G

Gord Dibben

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
On Error GoTo enditall
Application.EnableEvents = False
If Target.Cells.Column = 1 Then
n = Target.Row
If Target.Value <> "" _
And Target.Offset(0, 1).Value = "" Then
Target.Offset(0, 1).Value = Now
End If
End If
enditall:
Application.EnableEvents = True
End Sub

This sheet event code. Right-click on the sheet tab and "View Code".

Copy/paste into that sheet module.

As written works on column A only.


Gord Dibben MS Excel MVP
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top