Propiedad Field.TextRange (Publisher)

Devuelve un objeto TextRange que representa el texto que está unido a una forma y las propiedades y métodos de manipulación del texto.

Sintaxis

expresión. TextRange

expresión Variable que representa un objeto Field .

Ejemplo

En el siguiente ejemplo se agrega texto al marco de texto de la forma uno de la publicación activa y, a continuación, se da formato al texto nuevo. En este ejemplo se supone que existe al menos una forma en la primera página de la publicación activa.

Sub AddTextToTextFrame() 
 With ActiveDocument.Pages(1).TextFrame.TextRange 
 .Text = "My Text" 
 With .Font 
 .Bold = msoTrue 
 .Size = 25 
 .Name = "Arial" 
 End With 
 End With 
End Sub

En el siguiente ejemplo se agrega un rectángulo a la publicación activa y luego se le agrega texto.

Sub AddTextToShape() 
 With ActiveDocument.Pages(1).Shapes.AddShape(Type:=msoShapeRectangle, _ 
 Left:=72, Top:=72, Width:=250, Height:=140) 
 .TextFrame.TextRange.Text = "Here is some test text" 
 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.