Publisher (的 TextRange.InsertAfter 方法)

會傳回 TextRange 物件，代表附加至文字範圍結尾的文字。

語法

運算式。InsertAfter (NewText)

表達 代表 TextRange 物件的 變數。

參數

名稱	必要/選用	資料類型	描述
NewText	必要	String	要插入的文字。

傳回值

TextRange

範例

本範例會將 Microsoft Publisher 的組建編號加到使用中出版物第一頁上第一個圖形的結束處。 本範例假設指定的圖案是文字框架，而非其他類型的圖案。

Sub AppendText() 
 With ActiveDocument.Pages(1).Shapes(1) 
 .TextFrame.TextRange.InsertAfter _ 
 NewText:="Microsoft Publisher Build : " & Build 
 End With 
End Sub

支援和意見反應

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