InsertAfter メソッド

  • [アーティクル]
Microsoft PowerPoint Visual Basic リファレンス

InsertAfter メソッド

指定されたテキスト範囲の終わりに文字列を追加します。追加するテキストを表す TextRange オブジェクトを返します。引数を指定しないでこのメソッドを使用した場合、指定されたテキスト範囲の終わりには長さ 0 の文字列 ("") が返されます。

expression**.InsertAfter(NewText)**

*expression *  必ず指定します。TextRange オブジェクトを返すオブジェクト式を指定します。

NewText  省略可能です。文字列型 (String) の値を指定します。挿入するテキストを指定します。既定値は長さ 0 の文字列 ("") です。

使用例

次の使用例は、作業中のプレゼンテーションのスライド 1 のタイトルの終わりに文字列 ": 試用版" を追加します。スライド 1 は白紙のレイアウト以外を指定していると仮定します。

With Application.ActivePresentation.Slides(1).Shapes(1)
    .TextFrame.TextRange.InsertAfter ": 試用版"
End With

次の使用例は、クリップボードの内容をスライド 1 のタイトルの終わりに追加します。

Application.ActivePresentation.Slides(1).Shapes(1).TextFrame _
    .TextRange.InsertAfter.Paste