Clase ParagraphFormat (PowerPoint VBA)

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

Set

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

Dim pft as ParagraphFormat
Set pft = ActiveWindow.Selection.TextRange.ParagraphFormat

Los siguientes procedimientos se pueden usar para establecer variables de clase ParagraphFormat : TextRange.ParagraphFormat y TextStyleLevel.ParagraphFormat

Propiedades

Alignment Devuelve o establece la alineación de cada párrafo en el formato de párrafo especificado. Lectura y escritura.

ActiveWindow.Selection.TextRange.ParagraphFormat.Alignment = ppAlignCenter

BaseLineAlignment Devuelve o establece la alineación con la línea base de un párrafo determinado. Lectura y escritura.

ActiveWindow.Selection.TextRange.ParagraphFormat.BaseLineAlignment = ppBaselineAlignAuto

Bullet Devuelve un objeto BulletFormat que representa el formato de viñetas del formato de párrafo especificado. Solo lectura.

Dim bftBullet As BulletFormat
Set bftBullet = ActiveWindow.Selection.TextRange.ParagraphFormat.Bullet

FarEastLineBreakControl Devuelve o establece la opción de control de salto de línea si ha especificado la configuración de un idioma asiático. Lectura y escritura.

ActiveWindow.Selection.TextRange.ParagraphFormat.FarEastLineBreakControl = msoTrue

HangingPunctuation Devuelve o establece la opción de puntuación fuera de margen si ha especificado la configuración de un idioma asiático. Lectura y escritura.

ActiveWindow.Selection.TextRange.ParagraphFormat.HangingPunctuation = msoTrue

LineRuleAfter Determina si el interlineado que sigue a la última línea de cada párrafo está establecido en un número concreto de puntos o líneas. Lectura y escritura.

ActiveWindow.Selection.TextRange.ParagraphFormat.LineRuleAfter = msoTrue

LineRuleBefore Determina si el interlineado que precede a la primera línea de cada párrafo está establecido en un número concreto de puntos o líneas. Lectura y escritura.

ActiveWindow.Selection.TextRange.ParagraphFormat.LineRuleBefore = msoTrue

LineRuleWithin Determina si el interlineado entre líneas base está establecido en un número concreto de puntos o líneas. Lectura y escritura.

ActiveWindow.Selection.TextRange.ParagraphFormat.LineRuleWithin = msoTrue

Parent Devuelve el objeto primario del objeto especificado.

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

SpaceAfter Devuelve o establece la cantidad de espacio, en puntos o líneas, después de la última línea de cada párrafo del texto especificado. Lectura y escritura.

ActiveWindow.Selection.TextRange.ParagraphFormat.SpaceAfter = 6

SpaceBefore Devuelve o establece la cantidad de espacio, en puntos o líneas, antes de la primera línea de cada párrafo del texto especificado. Lectura y escritura.

ActiveWindow.Selection.TextRange.ParagraphFormat.SpaceBefore = 3

SpaceWithin Devuelve o establece la cantidad de espacio, en puntos o líneas, entre las líneas base del texto especificado. Lectura y escritura.

ActiveWindow.Selection.TextRange.ParagraphFormat.SpaceWithin = 2

TextDirection Devuelve o establece la dirección del texto en el párrafo especificado. Lectura y escritura.

ActiveWindow.Selection.TextRange.ParagraphFormat.TextDirection = ppDirectionLeftToRight

WordWrap Se usa solo con caracteres kanji. Lectura y escritura.

ActiveWindow.Selection.TextRange.ParagraphFormat.WordWrap = msoTrue