Clase TableStyleElement - un único elemento de estilo de tabla (Excel VBA)
La clase TableStyleElement representa un único elemento de estilo de tabla. Para usar una variable de clase TableStyleElement, primero debe ser instanciado, por ejemplo
Dim tblele as TableStyleElement
Set tblele = ActiveWorkbook.DefaultPivotTableStyle.TableStyleElements(Index:=1)
For Each
A continuación, se muestra un ejemplo de cómo procesar los elementos TableStyleElement en una colección.
Dim tblele As TableStyleElement
For Each tblele In ActiveWorkbook.DefaultPivotTableStyle.TableStyleElements
Next tblele
Borders
Devuelve una colección Borders que representa los bordes de un objeto TableStyleElement ( . Solo lectura.
Dim brdsBorders As Borders
Set brdsBorders = ActiveWorkbook.DefaultPivotTableStyle.TableStyleElements(1).Borders
Clear
Borra el formato de este elemento.
ActiveWorkbook.DefaultPivotTableStyle.TableStyleElements(1).Clear
Font
Devuelve un objeto Font que representa la fuente del objeto especificado. Solo lectura.
Dim fntFont As Font
Set fntFont = ActiveWorkbook.DefaultPivotTableStyle.TableStyleElements(1).Font
HasFormat
Devuelve si un elemento de estilo de tabla tiene formato aplicado al elemento especificado. Boolean de solo lectura.
Dim booHasFormat As Boolean
booHasFormat = ActiveWorkbook.DefaultPivotTableStyle.TableStyleElements(1).HasFormat
Interior
Devuelve un objeto Interior que representa el interior del objeto especificado. Solo lectura.
Dim intInterior As Interior
Set intInterior = ActiveWorkbook.DefaultPivotTableStyle.TableStyleElements(1).Interior
StripeSize
Devuelve o establece el tamaño de las bandas. Long de lectura y escritura.
Esta propiedad no se aplica a todos los objetos TableStyleElement. Solo se aplica a los tipos xlColumnStripe1, xlColumnStripe2, xlRowStripe1y xlRowStripe2 (para obtener más información, vea XlTableStyleElementType).
ActiveWorkbook.DefaultPivotTableStyle.TableStyleElements(1).StripeSize =