Clase ThemeVariant (PowerPoint VBA)

La clase ThemeVariant representa una variación (conjunto de colores y fuentes) en un tema.

Set

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

Dim tvt as ThemeVariant
Set tvt = Application.OpenThemeFile.ThemeVariants(Index:=1)

Los siguientes procedimientos se pueden usar para establecer variables de clase ThemeVariant : ThemeVariants.Item y Theme.ThemeVariants

Height

Devuelve el alto de la variación del tema. Solo lectura.

Dim lngHeight As Long
lngHeight = Application.OpenThemeFile.ThemeVariants(1).Height

Id

Devuelve una cadena que representa el identificador de la variación del tema. Solo lectura.

Dim strId As String
strId = Application.OpenThemeFile.ThemeVariants(1).Id

Name

Devuelve el nombre de la variación del tema. Solo lectura.

Dim strName As String
strName = Application.OpenThemeFile.ThemeVariants(1).Name

Parent

Devuelve al objeto primario del objeto especificado. Objetode solo lectura.

Width

Devuelve el alto de la variación del tema. Solo lectura.

Dim lngWidth As Long
lngWidth = Application.OpenThemeFile.ThemeVariants(1).Width

ThemeVariants.Count

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

Dim lngCount As Long
lngCount = Application.OpenThemeFile.ThemeVariants.Count

ThemeVariants.Item

Devuelve un único objeto ThemeVariant de la colección.

Sintaxis : expression.Item (Index)

Index: Número de índice del objeto ThemeVariant único de la colección que se va a devolver.

Dim tvt As ThemeVariant
Set tvt = Application.OpenThemeFile.ThemeVariants(Index:=1)

ThemeVariants.Parent

Devuelve al objeto primario del objeto especificado. Objetode solo lectura.