Свойство Comment.DateTime (PowerPoint)

Возвращает дату и время создания комментария.

Синтаксис

выражение. DateTime

выражение Переменная, представляющая объект Comment .

Возвращаемое значение

Date

Замечания

Не путайте это свойство со свойством DateAndTime , которое применяется к верхним и нижним колонтитулам слайда.

Пример

В следующем примере содержатся сведения обо всех комментариях для данного слайда.

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

См. также

Объект Comment

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.