Insertar texto en un documento

Utilice el método InsertBefore o el método InsertAfter del objeto Selection o el objeto Range para insertar texto antes o después de una selección o intervalo de texto. En el siguiente ejemplo, se inserta texto al final del documento activo.

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

En el siguiente ejemplo, se inserta texto delante de la selección.

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

Después de utilizar el método InsertBefore o InsertAfter, Range o Selection se expande para incluir el nuevo texto. Use el método Collapse para contraer un Selection o Range en el punto inicial o final.

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.