Workbook.TableStyles (Excel)

Retorna um objeto da coleção TableStyles para a pasta de trabalho atual que se refere aos estilos usados na pasta de trabalho atual. Somente leitura.

Você pode manipular os estilos de tabela retornados pela propriedade.

Dim tssTableStyles As TableStyles
Set tssTableStyles = ActiveWorkbook.TableStyles