Document.DefaultTableStyle (Word)

Renvoie une valeur de type Variant qui représente le style de tableau appliqué à tous les nouveaux tableaux créés dans un document.

Sub TableDefaultStyle() 
 With ActiveDocument 
 If .DefaultTableStyle = "Table Normal" Then 
 .SetDefaultTableStyle _ 
 Style:="TableStyle1", SetInTemplate:=True 
 End If 
 End With 
End Sub