Clase ParagraphFormat (Word VBA)

La clase ParagraphFormat representa todo el formato de un párrafo.

Los principales procedimientos de la clase ParagraphFormat son OpenOrCloseUp y OpenUp

Set

Para usar una variable de clase ParagraphFormat, primero debe ser instanciado, por ejemplo

Dim pft as ParagraphFormat
Set pft = Selection.ParagraphFormat

Los siguientes procedimientos se pueden usar para establecer variables de clase ParagraphFormat : ConditionalStyle.ParagraphFormat, Find.ParagraphFormat, Paragraph.Format, Duplicate, Paragraphs.Format, Range.ParagraphFormat, Replacement.ParagraphFormat, Selection.ParagraphFormat y Style.ParagraphFormat

Métodos

Los principales métodos de la clase ParagraphFormat son

OpenOrCloseUp - Activa o desactiva el espaciado que precede a los párrafos especificados.

Selection.ParagraphFormat.OpenOrCloseUp

OpenUp - Establece un espaciado de 12 puntos delante de los párrafos especificados.

Selection.ParagraphFormat.OpenUp

Propiedades

AddSpaceBetweenFarEastAndAlpha True si Microsoft Word se configura automáticamente agregar espacios entre texto en japonés y en alfabeto latino en los párrafos especificados.

Selection.ParagraphFormat.AddSpaceBetweenFarEastAndAlpha =

AddSpaceBetweenFarEastAndDigit True si Microsoft Word está configurado para agregar automáticamente espacios entre texto en japonés y números de los párrafos especificados.

Selection.ParagraphFormat.AddSpaceBetweenFarEastAndDigit =

Alignment Devuelve o establece una constante WdParagraphAlignment que representa la alineación de los párrafos especificados.

Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter

AutoAdjustRightIndent True si Microsoft Word se configura automáticamente ajustar la sangría derecha de los párrafos especificados si se ha especificado un número de conjunto de caracteres por línea.

Selection.ParagraphFormat.AutoAdjustRightIndent =

BaseLineAlignment Devuelve o establece una constante WdBaselineAlignment que representa la posición vertical de las fuentes en una línea.

Selection.ParagraphFormat.BaseLineAlignment = wdBaselineAlignAuto

Borders Devuelve una colección Borders que representa todos los bordes del objeto especificado.

Selection.ParagraphFormat.Borders =

CharacterUnitFirstLineIndent Devuelve o establece el valor (en caracteres) de una sangría de primera línea o francesa.

Selection.ParagraphFormat.CharacterUnitFirstLineIndent =

CharacterUnitLeftIndent Devuelve o establece el valor de la sangría izquierda (en caracteres) para los párrafos especificados.

Selection.ParagraphFormat.CharacterUnitLeftIndent =

CharacterUnitRightIndent Devuelve o establece el valor de la sangría derecha (en caracteres) para los párrafos especificados.

Selection.ParagraphFormat.CharacterUnitRightIndent =

CollapsedByDefault Devuelve o establece si el formato de párrafo especificado está contraído de forma predeterminada.

Selection.ParagraphFormat.CollapsedByDefault =

DisableLineHeightGrid True si Microsoft Word alinea los caracteres de los párrafos especificados a la cuadrícula de líneas cuando un número determinado de líneas por página es especificado.

Selection.ParagraphFormat.DisableLineHeightGrid =

Duplicate Devuelve un objeto ParagraphFormat de solo lectura que representa el formato de párrafo del párrafo especificado.

Dim pftDuplicate As ParagraphFormat
Set pftDuplicate = Selection.ParagraphFormat.Duplicate

FarEastLineBreakControl True si Microsoft Word aplica las reglas de salto de línea del este asiático a los párrafos especificados.

Selection.ParagraphFormat.FarEastLineBreakControl =

FirstLineIndent Devuelve o establece el valor (en puntos) de la primera línea o francesa sangría.

Selection.ParagraphFormat.FirstLineIndent =

HalfWidthPunctuationOnTopOfLine True si Microsoft Word cambia los símbolos de puntuación al principio de una línea por caracteres de ancho medio de los párrafos especificados.

Selection.ParagraphFormat.HalfWidthPunctuationOnTopOfLine =

HangingPunctuation True si la puntuación fuera de margen está habilitado para los párrafos especificados.

Selection.ParagraphFormat.HangingPunctuation =

Hyphenation True si los párrafos especificados están incluidos en la división automática de palabras.

Selection.ParagraphFormat.Hyphenation =

KeepTogether True si todas las líneas de los párrafos especificados permanecen en la misma página cuando Microsoft Word repagina el documento.

Selection.ParagraphFormat.KeepTogether =

KeepWithNext True si el párrafo especificado permanece en la misma página que el párrafo siguiente cuando Microsoft Word repagina el documento.

Selection.ParagraphFormat.KeepWithNext =

LeftIndent Devuelve o establece un valor Single que representa el valor de la sangría izquierda (en puntos) del formato de párrafo especificado.

Selection.ParagraphFormat.LeftIndent =

LineSpacing Devuelve o establece el interlineado (en puntos) de los párrafos especificados.

Selection.ParagraphFormat.LineSpacing =

LineSpacingRule Devuelve o establece el interlineado del formato de párrafo especificado.

Selection.ParagraphFormat.LineSpacingRule = wdLineSpace1pt5

LineUnitAfter Devuelve o establece la cantidad de espaciado (en las líneas de división) después de los párrafos especificados.

Selection.ParagraphFormat.LineUnitAfter =

LineUnitBefore Devuelve o establece la cantidad de espacio (en las líneas de división) antes de los párrafos especificados.

Selection.ParagraphFormat.LineUnitBefore =

MirrorIndents Devuelve o establece un Long que indica si las sangrías izquierda y derecha tienen el mismo ancho.

Selection.ParagraphFormat.MirrorIndents =

NoLineNumber True si los números de línea no incrementan en los párrafos especificados.

Selection.ParagraphFormat.NoLineNumber =

OutlineLevel Devuelve o establece el nivel de esquema de los párrafos especificados.

Selection.ParagraphFormat.OutlineLevel = wdOutlineLevel1

PageBreakBefore True si se incluye un salto de página delante de los párrafos especificados.

Selection.ParagraphFormat.PageBreakBefore =

Parent Devuelve un objeto Object que representa el objeto primario del objeto ParagraphFormat especificado.

Dim objParent As Object
Set objParent = Selection.ParagraphFormat.Parent

ReadingOrder Devuelve o establece el orden de lectura de los párrafos especificados sin cambiar la alineación.

Selection.ParagraphFormat.ReadingOrder = wdReadingOrderLtr

RightIndent Devuelve o establece la sangría derecha, en puntos, de los párrafos especificados.

Selection.ParagraphFormat.RightIndent =

Shading Devuelve un objeto shading que hace referencia al formato de sombreado del objeto especificado.

Dim shdShading As Shading
Set shdShading = Selection.ParagraphFormat.Shading

SpaceAfter Devuelve o establece la cantidad de espaciado (en puntos) después de la columna de texto o del párrafo especificada.

Selection.ParagraphFormat.SpaceAfter =

SpaceAfterAuto True si Microsoft Word establece automáticamente la cantidad de espaciado después de los párrafos especificados.

Selection.ParagraphFormat.SpaceAfterAuto =

SpaceBefore Devuelve o establece el espaciado (en puntos) que precede a los párrafos especificados.

Selection.ParagraphFormat.SpaceBefore =

SpaceBeforeAuto True si Microsoft Word establece automáticamente la cantidad de espaciado que precede a los párrafos especificados.

Selection.ParagraphFormat.SpaceBeforeAuto =

Style Devuelve o establece el estilo para el objeto especificado.

Selection.ParagraphFormat.Style =

TabStops Devuelve o establece una colección TabStops que representa todas las tabulaciones personalizadas de los párrafos especificados.

Selection.ParagraphFormat.TabStops =

TextboxTightWrap Devuelve o establece una constante WdTextboxTightWrap que representa el grado de ajuste del texto alrededor de las formas o los cuadros de texto.

Selection.ParagraphFormat.TextboxTightWrap = wdTightAll

WidowControl True si las líneas primeros y últimos del párrafo especificado permanecen en la misma página que el resto del párrafo cuando Word repagine el documento.

Selection.ParagraphFormat.WidowControl =

WordWrap True si Microsoft Word ajusta el texto latino en medio de una palabra en los párrafos o marcos de texto especificados.

Selection.ParagraphFormat.WordWrap =