共用方式為


PowerPoint) (TextRange.InsertAfter 方法

將字串附加至指定的文字範圍的結尾。 會傳回 TextRange 物件,代表附加的文字。 不含引數時,此方法會傳回零長度字串指定範圍的結尾。

語法

expressionInsertAfter( _NewText_ )

表達 代表 TextRange 物件的 變數。

參數

名稱 必要/選用 資料類型 描述
NewText 選用 String 要插入的文字。 預設值是空字串。

範例

這則範例會將字串 ": Test version" 附加至使用中簡報之第一張投影片標題的結尾。

With Application.ActivePresentation.Slides(1).Shapes(1)

    .TextFrame.TextRange.InsertAfter ": Test version"

End With

這則範例會將 [剪貼簿] 的內容附加至第一張投影片標題的結尾。

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

另請參閱

TextRange 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應