Selection.InsertAfter メソッド (Word)

選択範囲の終了位置に指定された文字列を挿入します。

構文

InsertAfter( _Text_ )

が必要です。 Selection オブジェクトを表す変数を指定します。

パラメーター

名前 必須 / オプション データ型 説明
テキスト 必須 文字列型 (String) 挿入する文字列を指定します。

注釈

このメソッドを使用すると、新しく挿入された文字列分、選択範囲が拡張されます。

InsertAfter メソッドで Visual Basic の Chr 関数を使用すると、引用符、タブ、改行しないハイフンなどを挿入できます。 Visual Basic 定数の vbCrvbLfvbCrLf、および vbTab も使用できます。

段落全体を参照する選択範囲でこのメソッドを使用すると、終了段落マークの後にテキストが挿入されます (テキストは次の段落の先頭に表示されます)。 段落の末尾にテキストを挿入するには、次の例に示すように、終了ポイントを決定し、この位置から 1 を減算します (段落マークは 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."

ただし、選択範囲の末尾が段落記号であり、それが文書の最後でもある場合は、文書の最後に新しい段落が追加されるのではなく、最後の段落記号の前に文字列が挿入されます。 また、選択範囲がブックマークの場合は、指定された文字列は挿入されますが、新しく挿入した文字列まで選択範囲は拡張されません。

次の使用例は、選択範囲の終了位置に文字列を挿入し、選択を解除し、選択終了位置にカーソルを移します。

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

関連項目

Selection オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。