En VBA, pour appliquer un style à un tableau, on peut donner son nom en clair. C'est la solution la plus simple. Il suffit de passer la souris sur le nom des styles pour le connaître.

Voyez à ce sujet cet article.

MAIS... depuis la version 2013, ces noms ont changé, et votre macro risque de ne pas reconnaître le style.

Pourquoi ? Parce que les noms des styles contiennent des espaces insécables qu'on ne sait pas reproduire manuellement dans le code VBA.

Une solution permet de donner non pas le nom local du style, mais sa valeur. Accessoirement l'utilisation de la valeur plutôt que du nom local du style permettra de travailler en mode international, la valeur étant la même quelle que soit la nationalité du logiciel.

En revanche, le problème est de savoir comment connaître la valeur. 

J'ai donc créé un tableau de correspondance que vous trouverez ci-dessous. Donc, dans votre macro, au lieu de mettre le nom, vous mettrez la valeur correspondante, par exemple :

ActiveDocument.Tables(1).Style = -289

sera identique à :

ActiveDocument.Tables(1).Style = "Tableau Grille 2 - Accentuation 2"