TextRange datetime メソッド (PowerPoint)TextRange.InsertDateTime method (PowerPoint)

指定したテキスト範囲内の日付と時刻を挿入します。Inserts the date and time in the specified text range. 挿入したテキストを表すTextRangeオブジェクトを返します。Returns a TextRange object that represents the inserted text.

構文Syntax

expression.expression. InsertDateTime( _DateTimeFormat_, _InsertAsField_ )

TextRangeオブジェクトを表す変数を取得します。expression A variable that represents a TextRange object.

パラメーターParameters

名前Name 必須 / オプションRequired/Optional データ型Data type 説明Description
DateTimeFormatDateTimeFormat 必須Required PpDateTimeFormatPpDateTimeFormat 日付と時刻の書式を指定します。A format for the date and time.
InsertAsFieldInsertAsField オプションOptional MsoTriStateMsoTriState プレゼンテーションを開くたびに、挿入された日付と時刻を更新するかどうかを指定します。Determines whether the inserted date and time will be updated each time the presentation is opened.

戻り値Return value

TextRangeTextRange

解説Remarks

_DateTimeFormat_パラメーターの値には、これらのPpDateTimeFormat定数のいずれかを指定できます。The DateTimeFormat parameter value can be one of these PpDateTimeFormat constants.

ppDateTimeddddMMMMddyyyyppDateTimeddddMMMMddyyyy
ppDateTimedMMMMyyyyppDateTimedMMMMyyyy
ppDateTimedMMMyyppDateTimedMMMyy
ppDateTimeFormatMixedppDateTimeFormatMixed
ppDateTimeHmmppDateTimeHmm
ppDateTimehmmAMPMppDateTimehmmAMPM
ppDateTimeHmmssppDateTimeHmmss
ppDateTimehmmssAMPMppDateTimehmmssAMPM
ppDateTimeMdyyppDateTimeMdyy
ppDateTimeMMddyyHmmppDateTimeMMddyyHmm
ppDateTimeMMddyyhmmAMPMppDateTimeMMddyyhmmAMPM
ppDateTimeMMMMdyyyyppDateTimeMMMMdyyyy
ppDateTimeMMMMyyppDateTimeMMMMyy
ppDateTimeMMyyppDateTimeMMyy

_InsertAsField_パラメーターの値に使用できるのは、次に示すMsoTriStateクラスの定数のいずれかです。The InsertAsField parameter value can be one of these MsoTriState constants.

定数Constant 説明Description
msoFalsemsoFalse 既定値です。The default.
msoTruemsoTrue プレゼンテーションを開くたびに、挿入された日付と時刻を更新します。Updates the inserted date and time each time the presentation is opened.

Example

次の使用例は、作業中のプレゼンテーションのスライド 1 の図形 2 内の、最初の段落の最初の文の後に日付を挿入します。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

関連項目See also

TextRange オブジェクトTextRange Object

サポートとフィードバックSupport and feedback

Office VBA またはこの説明書に関するご質問やフィードバックがありますか?Have questions or feedback about Office VBA or this documentation? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.