TextRange.InsertDateTime Method
Inserts the date and time in the specified text range. Returns a TextRange object that represents the inserted text.
Namespace: Microsoft.Office.Interop.PowerPoint
Assembly: Microsoft.Office.Interop.PowerPoint (in Microsoft.Office.Interop.PowerPoint.dll)
Syntax
'Declaration
Function InsertDateTime ( _
DateTimeFormat As PpDateTimeFormat, _
InsertAsField As MsoTriState _
) As TextRange
'Usage
Dim instance As TextRange
Dim DateTimeFormat As PpDateTimeFormat
Dim InsertAsField As MsoTriState
Dim returnValue As TextRange
returnValue = instance.InsertDateTime(DateTimeFormat, _
InsertAsField)
TextRange InsertDateTime(
PpDateTimeFormat DateTimeFormat,
MsoTriState InsertAsField
)
Parameters
- DateTimeFormat
Type: Microsoft.Office.Interop.PowerPoint.PpDateTimeFormat
A format for the date and time.
- InsertAsField
Type: Microsoft.Office.Core.MsoTriState
Determines whether the inserted date and time will be updated each time the presentation is opened.
Return Value
Type: Microsoft.Office.Interop.PowerPoint.TextRange
TextRange
Remarks
The DateTimeFormat parameter value can be one of these PpDateTimeFormat constants.
ppDateTimeddddMMMMddyyyy |
ppDateTimedMMMMyyyy |
ppDateTimedMMMyy |
ppDateTimeFormatMixed |
ppDateTimeHmm |
ppDateTimehmmAMPM |
ppDateTimeHmmss |
ppDateTimehmmssAMPM |
ppDateTimeMdyy |
ppDateTimeMMddyyHmm |
ppDateTimeMMddyyhmmAMPM |
ppDateTimeMMMMdyyyy |
ppDateTimeMMMMyy |
ppDateTimeMMyy |
The InsertAsField parameter value can be one of these MsoTriState constants.
Constant |
Description |
|---|---|
msoFalse |
The default. |
msoTrue |
Updates the inserted date and time each time the presentation is opened. |
Examples
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.InsertDateTimeppDateTimeMdyy