If I understand what you want, from the documentation, it would seem as if you can
- check if the
Resolved
property = True
- if so, then the Resolved date will be the timestamp of the last reply.
So something like:
Option Explicit
Sub Comments()
Dim myComment As CommentThreaded
Dim firstDate As Date, ResolvedDate As Variant
Set myComment = Range("A1").CommentThreaded
firstDate = myComment.Date
If myComment.Resolved Then
ResolvedDate = myComment.Replies(myComment.Replies.Count).Date
Else
ResolvedDate = "not yet resolved"
End If
MsgBox "Comment created at " & firstDate & vbLf & "Resolved at: " & ResolvedDate
End Sub
might give you what you want.
But please note, this is only returning the timestamp of the last comment made. If the assumption that the last person to comment did not also resolve it is incorrect, then there is no way that I can see of knowing the time of resolution (or even who did it).
Note that Replies are sorted by timestamp.
I don't know what you mean by "Completed Task"
date. I do not see a "Completed Task"
property for threaded comments in Excel VBA