InsertDateTime Method

Microsoft PowerPoint Visual Basic

Inserts the date and time in the specified text range. Returns a TextRange object that represents the inserted text.

expression.InsertDateTime(DateTimeFormat, InsertAsField)

expression    Required. An expression that returns a TextRange object.

DateTimeFormat   Required PpDateTimeFormat. A format for the date and time.

PpDateTimeFormat can be one of these PpDateTimeFormat constants.
ppDateTimeddddMMMMddyyyy
ppDateTimedMMMMyyyy
ppDateTimedMMMyy
ppDateTimeFormatMixed
ppDateTimeHmm
ppDateTimehmmAMPM
ppDateTimeHmmss
ppDateTimehmmssAMPM
ppDateTimeMdyy
ppDateTimeMMddyyHmm
ppDateTimeMMddyyhmmAMPM
ppDateTimeMMMMdyyyy
ppDateTimeMMMMyy
ppDateTimeMMyy

InsertAsField   Optional MsoTriState. Determines whether the inserted date and time will be updated each time the presentation is opened.

MsoTriState can be one of these MsoTriState constants.
msoCTrue
msoFalse Default.
msoTriStateMixed
msoTriStateToggle
msoTrue Updates the inserted date and time each time the presentation is opened.

Example

This example inserts the date and time after the first sentence of the first paragraph in shape two on slide one in the active presentation.

Set sh = Application.ActivePresentation.Slides(1).Shapes(2)
Set sentOne = sh.TextFrame.TextRange.Paragraphs(1).Sentences(1)
sentOne.InsertAfter.InsertDateTime ppDateTimeMdyy