共用方式為

Word) (Selection.InsertAfter 方法

  • 發行項

會在範圍或選取範圍的結尾插入指定的文字。

語法

expression。 InsertAfter( _Text_ )

需要 expression。 代表 Selection 物件的變數。

參數

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

註解

在使用此方法之後，選取範圍就會展開成包含新的文字。

您可以使用 Visual Basic Chr 函數及 InsertAfter 方法插入引號、 tab 字元及不分行連字號等的字元。 您也可以使用下列的 Visual Basic 常數： ansi 字元 、 vbLf 、 vbCrLf 及 vbTab 。

如果將此方法用於代表整個段落的選取範圍，則會在結尾的段落標記之後插入文字 (文字將會出現在下一段的開頭)。 若要在段落結尾插入文字，請先確定終點位置，然後將此位置的值減去 1 (因為段落標記也代表一個字元)，如下列範例所示。

ActiveDocument.Range( _ 
 ActiveDocument.Paragraphs(1).Range.Start, _ 
 ActiveDocument.Paragraphs(1).Range.End - 1) _ 
 .Select 
 
Selection.InsertAfter _ 
 " This is now the last sentence in paragraph one."

但是，如果選取範圍結尾的段落標記剛好也是文件結尾，則 Microsoft Word 就會在最後一個段落標記之前插入文字，而不會在文件結尾建立新的段落。 此外，如果選取範圍是書籤，則 Word 會插入指定的文字，但是不會將選取範圍或書籤展開成包含新的文字。

範例

這個範例會在選取範圍的結尾插入文字，然後將選取範圍摺疊至插入點。

With Selection 
 .InsertAfter "appended text" 
 .Collapse Direction:=wdCollapseEnd 
End With

另請參閱

Selection 物件

支援和意見反應

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