Propriedade Comment.DateTime (PowerPoint)
Retorna a data e a hora em que um comentário foi criado.
Sintaxe
expression. DateTime
Expressão Uma variável que representa um objeto Comment .
Valor de retorno
Data
Comentários
Não confunda essa propriedade com a propriedade DateAndTime, que se aplica aos cabeçalhos e rodapés de um slide.
Exemplo
O exemplo a seguir fornece informações sobre todos os comentários para um dado 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
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.