Prev: HELP: Populate Excel FORM from Access - Pull from multiple rows
Next: On/Off control?
From: Ryan H on 2 Feb 2010 12:10
I'm not sure which column you are concerned with so I assumed Col. A is where
users enter data and Col. B is were you want the time stamp to go in, right.
This macro should be placed in the worksheet module your users will be
entering the data. Make sure you format Col. B to the time or date format
you want to show in the cell. Then enter something anywhere in Col. A and
watch what happens.

Hope this helps! If so, let me know, click "YES" below.


Private Sub Worksheet_Change(ByVal Target As Range)

Dim MyRange As Range

Set MyRange = Application.Intersect(Target, Range("A:A"))

If Not MyRange Is Nothing Then
Target.Offset(, 1).Value = Now
End If

End Sub
--
Cheers,
Ryan


"JasonK" wrote:

>
> Still using 2003.
>
> I have a spread sheet that records data in a column that is entered by
> the user. I need a cell next to the entered data cell to reflect the
> accurate date and time the data was entered.
>
> Is there a formula I can enter into the adjacent cell that will
> automatically place the instant date/time that will not update with
> the next data entry?
>
> Thanks in advance,
> JasonK
>
>
> .
>
 | 
Pages: 1
Prev: HELP: Populate Excel FORM from Access - Pull from multiple rows
Next: On/Off control?