Class TableStyleElement (Excel VBA)
The class TableStyleElement represents a single table style element. To use a TableStyleElement class variable it first needs to be instantiated, for example
Dim tblele as TableStyleElement
Set tblele = ActiveWorkbook.DefaultPivotTableStyle.TableStyleElements(Index:=1)
For Each
Here is an example of processing the TableStyleElement items in a collection.
Dim tblele As TableStyleElement
For Each tblele In ActiveWorkbook.DefaultPivotTableStyle.TableStyleElements
Next tblele
Borders
Returns a Borders collection that represents the borders of a TableStyleElement object.
Dim brdsBorders As Borders
Set brdsBorders = ActiveWorkbook.DefaultPivotTableStyle.TableStyleElements(1).Borders
Clear
Clears the formatting for this element.
ActiveWorkbook.DefaultPivotTableStyle.TableStyleElements(1).Clear
Font
Returns a Font object that represents the font of the specified object.
Dim fntFont As Font
Set fntFont = ActiveWorkbook.DefaultPivotTableStyle.TableStyleElements(1).Font
HasFormat
Returns whether a table style element has formatting applied to the specified element.
Dim booHasFormat As Boolean
booHasFormat = ActiveWorkbook.DefaultPivotTableStyle.TableStyleElements(1).HasFormat
Interior
Returns an Interior object that represents the interior of the specified object.
Dim intInterior As Interior
Set intInterior = ActiveWorkbook.DefaultPivotTableStyle.TableStyleElements(1).Interior
StripeSize
Returns or sets the size of banding.
This property does not apply to all TableStyleElement objects. It applies only to xlColumnStripe1, xlColumnStripe2, xlRowStripe1, and xlRowStripe2 types (for more information, see XlTableStyleElementType).
ActiveWorkbook.DefaultPivotTableStyle.TableStyleElements(1).StripeSize =