Partager via


Propriété Comment.DateTime (PowerPoint)

Renvoie la date et l’heure de création d’un commentaire.

Syntaxe

expression. DateTime

expression Variable qui représente un objet Comment .

Valeur renvoyée

Date

Remarques

Ne confondez pas cette propriété avec la propriété DateAndTime , qui s’applique aux en-têtes et pieds de page d’une diapositive.

Exemple

L’exemple suivant montre comment afficher des informations sur tous les commentaires d’une diapositive donnée.

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

Voir aussi

Objet Comment

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.