Insert Date Comment

A

Aaron

Hi,

I am wanting to insert a comment with the current date when I change a cell value within a Range of cells. Thanks in advance!

Thanks,
Aaron
 
B

Bernie Deitrick

Aaron,

You can use the worksheet's change event. Copy the code below, right click
on the sheet tab, select "View code", then paste in the window that appears.
Change the range from A1:C10 to match your desired range.

HTH,
Bernie
MS Excel MVP

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:C10")) Is Nothing Then
Target.AddComment CStr(Date)
End If
End Sub


Aaron said:
Hi,

I am wanting to insert a comment with the current date when I change a
Click to expand...
cell value within a Range of cells. Thanks in advance!
 
Top