Share via

DateTime Property

  • Article

DateTime Property
This content is no longer actively maintained. It is provided as is, for anyone who may still be using these technologies, with no warranties or claims of accuracy with regard to the most recent product version or service release.

Returns a Date representing the date and time a comment was created.

expression.DateTime

expression   Required. An expression that returns a Comment object.

Remarks

Don't confuse this property with the DateAndTime property, which applies to the headers and footers of a slide.

Example

The following example provides information about all the comments for a given slide.

  Sub ListComments()
    Dim cmtExisting As Comment
    Dim strAuthorInfo As String

    For Each cmtExisting In ActivePresentation.Slides(1).Comments
        With cmtExisting
            strAuthorInfo = strAuthorInfo & .Author & "'s comment #" & _
                .AuthorIndex & " (" & .Text & ") was created on " & _
                .DateTime & vbCrLf
        End With
    Next

    If strAuthorInfo <> "" Then
        MsgBox strAuthorInfo
    Else
        MsgBox "There are no comments on this slide."
    End If
End Sub