Range.TableStyle (Word)

Retorna um valor que representa o estilo usado para formatar uma tabela. Somente leitura.

Dim tblstyTableStyle As TableStyle
Set tblstyTableStyle = ActiveDocument.Range.TableStyle