not sure if this is what you want; this is code for enter anything in a
specified cell in "1 line", get date in different cell same line. this
example has a couple of items added: uses range, exit if less than certain
row (header), exit lines not to be figured (that have a "." in first cell in
line); Destination Cell A, for changes made in
B or C.

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
With Target
If .Count 1 Then Exit Sub
If Target.Row < 91 Then Exit Sub
If Me.Cells(.Row, "A").Value = "." Then Exit Sub
If Not Intersect(Me.Range("B:C"), .Cells) Is Nothing Then
Application.EnableEvents = False
With Me.Cells(.Row, "A")
.NumberFormat = "dd"
.Value = Now
End With
Application.EnableEvents = True
End If
End With
End Sub


"sigfreund" wrote:


Can I have the time entered into cell a1 automatically by entering a
value into b1 or c1, if so how can I have this continue down the entire
colum. I am stuck in a hospital bed and need to figure out an easy way
to track some fluid ins and outs and keep a running total. Thanks


--
sigfreund
------------------------------------------------------------------------
sigfreund's Profile: http://www.excelforum.com/member.php...o&userid=32096
View this thread: http://www.excelforum.com/showthread...hreadid=518500