Вставка текста в документ

Используйте метод InsertBefore или InsertAfter объекта Selection или объекта Range , чтобы вставить текст до или после выделения или диапазона текста. В следующем примере текст вставляется в конец активного документа.

Sub InsertTextAtEndOfDocument() 
 ActiveDocument.Content.InsertAfter Text:=" The end." 
End Sub

В следующем примере текст вставляется перед выделенным фрагментом.

Sub AddTextBeforeSelection() 
 Selection.InsertBefore Text:="new text " 
End Sub

После использования метода InsertBefore или InsertAfterдиапазон или выделение разворачиваются, чтобы включить новый текст. Используйте метод Collapse , чтобы свернуть объект Selection или Range до начальной или конечной точки.

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.