InsertDateTime メソッド
| Microsoft PowerPoint Visual Basic リファレンス |
InsertDateTime メソッド
指定されたテキスト範囲に日付と時刻を挿入します。挿入するテキストを表す TextRange オブジェクトを返します。
expression**.InsertDateTime(DateTimeFormat**, InsertAsField)
*expression * 必ず指定します。TextRange オブジェクトを返すオブジェクト式を指定します。
DateTimeFormat* 必ず指定します。**PpDateTimeFormat クラスの定数を使用します。日付と時刻の書式を指定します。*
| 使用できる定数は、次に示す PpDateTimeFormat クラスの定数のいずれかです。 |
| ppDateTimeddddMMMMddyyyy |
| ppDateTimedMMMMyyyy |
| ppDateTimedMMMyy |
| ppDateTimeFormatMixed |
| ppDateTimeHmm |
| ppDateTimehmmAMPM |
| ppDateTimeHmmss |
| ppDateTimehmmssAMPM |
| ppDateTimeMdyy |
| ppDateTimeMMddyyHmm |
| ppDateTimeMMddyyhmmAMPM |
| ppDateTimeMMMMdyyyy |
| ppDateTimeMMMMyy |
| ppDateTimeMMyy |
InsertAsField* 省略可能です。**MsoTriState クラスの定数を使用します。挿入された日付と時刻は、プレゼンテーションを開くたびに更新されるかどうかを指定します。*
| 使用できる定数は、次に示す MsoTriState クラスの定数のいずれかです。 |
| msoCTrue |
| msoFalse (既定値) |
| msoTriStateMixed |
| msoTriStateToggle |
| msoTrue プレゼンテーションを開くたびに挿入された日付と時刻を更新します。 |
使用例
次の使用例は、作業中のプレゼンテーションのスライド 1 の図形 2 内の、最初の段落の最初の文の後に日付を挿入します。
Set sh = Application.ActivePresentation.Slides(1).Shapes(2)
Set sentOne = sh.TextFrame.TextRange.Paragraphs(1).Sentences(1)
sentOne.InsertAfter.InsertDateTime ppDateTimeMdyy