Objeto ParagraphFormat (Word)
Representa todo el formato de un párrafo.
Comentarios
Utilice el formato propiedad para devolver el objeto ParagraphFormat de un párrafo o varios párrafos. El ParagraphFormat propiedad devuelve el objeto ParagraphFormat de una selección, intervalo, estilo, objeto Find u objeto Replacement. En el ejemplo siguiente se centra el tercer párrafo del documento activo.
ActiveDocument.Paragraphs(3).Format.Alignment = _
wdAlignParagraphCenter
En el siguiente ejemplo, se busca el siguiente párrafo con doble espaciado a continuación de la selección.
With Selection.Find
.ClearFormatting
.ParagraphFormat.LineSpacingRule = wdLineSpaceDouble
.Text = ""
.Forward = True
.Wrap = wdFindContinue
End With
Selection.Find.Execute
Use la palabra clave New de Visual Basic para crear un nuevo objeto ParagraphFormat independiente. En el ejemplo siguiente se crea un objeto ParagraphFormat, establece algunas propiedades de formato para el mismo y, a continuación, se aplica a todas sus propiedades al primer párrafo del documento activo.
Dim myParaF As New ParagraphFormat
myParaF.Alignment = wdAlignParagraphCenter
myParaF.Borders.Enable = True
ActiveDocument.Paragraphs(1).Format = myParaF
También puede hacer una copia independiente de un objeto ParagraphFormat existente usando el duplicado propiedad. En el siguiente ejemplo, se duplica el formato de párrafo del primer párrafo del documento activo y se guarda el formato en myDup. En el ejemplo, se cambia la sangría izquierda de myDup a una pulgada, se crea un documento nuevo, se inserta texto en el documento y se aplica el formato de párrafo de myDup al texto.
Set myDup = ActiveDocument.Paragraphs(1).Format.Duplicate
myDup.LeftIndent = InchesToPoints(1)
Documents.Add
Selection.InsertAfter "This is a new paragraph."
Selection.Paragraphs.Format = myDup
Vea también
Referencia de modelos de objetos de Word
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.