a code to add altering time to cells

[tesoke]

Hi, I do not know anything about codes and writing them in Excel. I need some code that will track a range of cells and whenever a cell is altered the date is automatically added to the cell comment box. With the result that each comment box will have a list of dates that shows when changes have been made to the cell.

Your assistance is greatly appreciated.

[charlesdh]

HI,

Check this bit of code that I found. It may help you.
This code looks for changed data in column 5 row 5.
Should you need more help let us know.

Private Sub Worksheet_Change(ByVal Target As Range)
   If Target.Column <> 5 Then Exit Sub  'D.McR 2001-11-02 worksheet.functions
   If Target.Row <> 5 Then Exit Sub
      Dim ccc As String
   ccc = Format(Date + Time, "mm/dd/yy hh:mm") _
      & " " & Target.Value  ' -- Application.UserName
   If Target.Comment Is Nothing Then
      Target.AddComment.Text ccc
   Else
      Target.Comment.Text (Target.Comment.Text & Chr(10) & ccc)
   End If
   Target.Comment.Shape.TextFrame.AutoSize = True
End Sub

[tesoke]

Thanks a lot. Bless you.

[charlesdh]

Hi,

Thanks!