Clase TextStyle (PowerPoint VBA)

La clase TextStyle representa uno de los tres estilos de texto: texto de título, texto principal o texto predeterminado. Cada estilo de texto contiene un objeto TextFrame que describe la colocación del texto dentro del cuadro delimitador de texto, un objeto Ruler que contiene tabulaciones e información y una colección TextStyleLevels que contiene la información de formato de texto de esquema de formato de sangría del esquema. El objeto TextStyle es un miembro de la colección TextStyles.

Set

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

Dim tse as TextStyle
Set tse = ActivePresentation.SlideMaster.TextStyles(Type:=1)

Los siguientes procedimientos se pueden usar para establecer variables de clase TextStyle : TextStyles.Item y Master.TextStyles

Levels

Devuelve un objeto TextStyleLevels que representa el formato del texto del esquema. Solo lectura.

Dim tslsLevels As TextStyleLevels
Set tslsLevels = ActivePresentation.SlideMaster.TextStyles(1).Levels

Parent

Devuelve el objeto primario del objeto especificado.

Ruler

Devuelve un objeto Ruler que representa la regla del texto especificado. Solo lectura.

Dim rlrRuler As Ruler
Set rlrRuler = ActiveWindow.Selection.SlideRange(1).TextStyles(1).Ruler

TextFrame

Devuelve un objeto TextFrame que contiene la alineación y delimitación de propiedades para la forma especificada o el estilo de texto de patrón.

Utilice la propiedad TextRange del objeto TextFrame para devolver el texto del marco de texto. Utilice la propiedad HasTextFrame para determinar si una forma contiene un marco de texto antes de aplicar la propiedad TextFrame .

Dim tfeTextFrame As TextFrame
Set tfeTextFrame = ActiveWindow.Selection.SlideRange(1).TextStyles(1).TextFrame

TextStyles.Count

Devuelve el número de objetos de la colección especificada. Solo lectura.

Dim lngCount As Long
lngCount = ActiveWindow.Selection.SlideRange(1).TextStyles.Count

TextStyles.Item

Devuelve un solo estilo de texto de la colección TextStyles especificada.

El método Item es el miembro predeterminado de una colección. Por ejemplo, las dos líneas de código siguientes son equivalentes: ActivePresentation.Slides.Item(1) ActivePresentation.Slides(1) El valor del parámetro Type puede ser una de estas constantes PpTextStyleType .

Sintaxis : expression.Item (Type)

Type: Tipo de estilo de texto.

Dim tse As TextStyle
Set tse = ActivePresentation.SlideMaster.TextStyles(Type:=1)

TextStyles.Parent

Devuelve el objeto primario del objeto especificado.