Selection.InsertAfter メソッド (Word)
選択範囲の終了位置に指定された文字列を挿入します。
構文
式。 InsertAfter
( _Text_
)
式 が必要です。 Selection オブジェクトを表す変数を指定します。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
テキスト | 必須 | 文字列型 (String) | 挿入する文字列を指定します。 |
注釈
このメソッドを使用すると、新しく挿入された文字列分、選択範囲が拡張されます。
InsertAfter メソッドで Visual Basic の Chr 関数を使用すると、引用符、タブ、改行しないハイフンなどを挿入できます。 Visual Basic 定数の vbCr、vbLf、vbCrLf、および 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
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。