Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Devuelve un objeto TextRange que representa el texto anexado al final de un intervalo de texto.
Sintaxis
expresión. InsertAfter (NewText)
Expresión Variable que representa un objeto TextRange .
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| NewText | Obligatorio | String | Texto que se va a insertar. |
Valor devuelto
TextRange
Ejemplo:
En este ejemplo se agrega el número de compilación de Microsoft Publisher al final de la primera forma en la primera página de la publicación activa. En este ejemplo se supone que la forma especificada es un marco de texto y no otro tipo de forma.
Sub AppendText()
With ActiveDocument.Pages(1).Shapes(1)
.TextFrame.TextRange.InsertAfter _
NewText:="Microsoft Publisher Build : " & Build
End With
End Sub
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.