Publisher) (TextRange.InsertBefore 方法

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

語法

運算式。InsertBefore (NewText)

表達 代表 TextRange 物件的 變數。

參數

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

傳回值

TextRange

範例

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

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

支援和意見反應

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