Classe TableStyles (Excel VBA)

Cet objet représente les styles applicables à un tableau. Pour utiliser une variable de classe TableStyles, elle doit d'abord être instanciée, par exemple

Dim tss as TableStyles
Set tss = ActiveWorkbook.TableStyles

Add

Crée un nouvel objet TableStyle et l’ajoute à la collection.

Add (TableStyleName)

TableStyleName: Nom du style de tableau.

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

Count

Renvoie le nombre d'objets dans la collection. En lecture seule longue.

Dim lngCount As Long
lngCount = ActiveWorkbook.TableStyles.Count

Item

Cette méthode renvoie un seul objet d'une collection.

Item (Index)

Index: Nom ou numéro d'index de l'objet.

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