Clase TableStyles (Excel VBA)

La clase TableStyles representa los estilos que se pueden aplicar a una tabla. Para usar una variable de clase TableStyles, primero debe ser instanciado, por ejemplo

Dim tss as TableStyles
Set tss = ActiveWorkbook.TableStyles

Add

Crea un nuevo objeto TableStyle y lo agrega a la colección.

Add (TableStyleName)

TableStyleName: Nombre del estilo de tabla.

Dim strTableStyleName As String: strTableStyleName = 
Dim tblsty As TableStyle
Set tblsty = ActiveWorkbook.TableStyles.Add(TableStyleName:=strTableStyleName)

Count

Devuelve el número de objetos de la colección. Long de sólo lectura.

Dim lngCount As Long
lngCount = ActiveWorkbook.TableStyles.Count

Item

Devuelve un solo objeto de una colección.

Item (Index)

Index: Número de índice o nombre del objeto.

Dim tblsty As TableStyle
Set tblsty = ActiveWorkbook.TableStyles(Index:=1)