simora
02-03-2017, 01:55 PM
I am currently adding additional comments to a cell.
Is it possible to count the additional comments added to the cell ?
i.e : How many different comments are added, and show that running value in the comments themselves.
So the first comment =1 , & the next comment is Comment 2 etc... etc...
This is part of my current comments code which adds additional comments if there is a cell change;
With Target.Offset(0, 1)
Set x = .Comment
If x Is Nothing Then
.AddComment.Text Text:=Chr(10) & "$" & Target.Value & Chr(10) & " " & strDate & ":" & " - " & " === " & vbCrLf
Else
.Comment.Text .Comment.Text & vbLf & "$" & Target.Value & Chr(10) & " " & strDate & ":" & " - " & " === " & vbCrLf
End If
End With
Is it possible to count the additional comments added to the cell ?
i.e : How many different comments are added, and show that running value in the comments themselves.
So the first comment =1 , & the next comment is Comment 2 etc... etc...
This is part of my current comments code which adds additional comments if there is a cell change;
With Target.Offset(0, 1)
Set x = .Comment
If x Is Nothing Then
.AddComment.Text Text:=Chr(10) & "$" & Target.Value & Chr(10) & " " & strDate & ":" & " - " & " === " & vbCrLf
Else
.Comment.Text .Comment.Text & vbLf & "$" & Target.Value & Chr(10) & " " & strDate & ":" & " - " & " === " & vbCrLf
End If
End With