I update a cell every a few days with current date, like 11-1, 11-7,
11-10

I want to keep a record of the dates in comment. I am able to create a
new comment or add a record to the existing commend. But how can I keep
add data on top of exsing data in the comment, like

11-1
11-7
11-10


Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)

Dim PriorValue
Dim Mycell As Range
Dim cmt As Comment

Set Mycell = Target
PriorValue = Target.Text

On Error Resume Next
Set cmt = Mycell.Comment
On Error GoTo 0
If Not cmt Is Nothing Then
Mycell.Comment.Text privorvalue
Else
Mycell.AddComment PriorValue
End If

Target.Cells(1, 2).Activate

End Sub