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.
Representa todo el formato de un párrafo.
Observaciones
Utilice la propiedad TextStyle.ParagraphFormat para devolver el objeto ParagraphFormat de un párrafo o párrafo. La propiedad ParagraphFormat devuelve el objeto ParagraphFormat de una selección, intervalo o estilo.
Use el método Duplicate para copiar un objeto ParagraphFormat existente.
Ejemplo
En el ejemplo siguiente se centra el párrafo en la posición del cursor. En este ejemplo se supone que la primera forma es un cuadro de texto y no otro tipo de forma.
Sub CenterParagraph()
Selection.TextRange.ParagraphFormat _
.Alignment = pbParagraphAlignmentCenter
End Sub
El siguiente ejemplo duplica el formato de párrafo del primer párrafo de la publicación activa y guarda el formato en una variable. Este ejemplo duplica un objeto ParagraphFormat existente y, a continuación, cambia la sangría izquierda a una pulgada, crea un nuevo cuadro de texto, inserta texto en él y aplica el formato de párrafo del formato de párrafo duplicado al texto.
Sub DuplicateParagraphFormating()
Dim pfmtDup As ParagraphFormat
Set pfmtDup = ActiveDocument.Pages(1).Shapes(1).TextFrame _
.TextRange.ParagraphFormat.Duplicate
pfmtDup.LeftIndent = Application.InchesToPoints(1)
With ActiveDocument.Pages.Add(Count:=1, After:=1)
With .Shapes.AddTextbox(pbTextOrientationHorizontal, _
Left:=72, Top:=72, Width:=200, Height:=100)
With .TextFrame.TextRange
.Text = "This is a test of how to use " & _
"the ParagraphFormat object."
.ParagraphFormat = pfmtDup
End With
End With
End With
End Sub
Métodos
Propiedades
- Alignment
- Application
- AttachedToText
- CharBasedFirstLineIndent
- FirstLineIndent
- KashidaPercentage
- KeepLinesTogether
- KeepWithNext
- LeftIndent
- LineSpacing
- LineSpacingRule
- ListBulletFontName
- ListBulletFontSize
- ListBulletText
- ListIndent
- ListNumberSeparator
- ListNumberStart
- ListType
- LockToBaseLine
- Parent
- RightIndent
- SpaceAfter
- SpaceBefore
- StartInNextTextBox
- Pestañas
- TextDirection
- TextStyle
- UseCharBasedFirstLineIndent
- WidowControl
Vea también
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.