Couleur VBA du quadrillage visible du mot des tableaux

Question

J'ai plus de 500 tables dans Word. Tous ont des bordures vertes horizontales en haut et en bas de la table, et quelques lignes horizontales à l'intérieur de la table. En raison d'une erreur, certaines lignes à l'intérieur de la même table et entre les tables ont des couleurs vertes différentes.

Je dois unifier la couleur des bords visibles de toutes les tables au même vert (RVB: 0,128,0).

Je suis très nouveau avec VBA. Je regarde cela depuis des semaines sans succès.

Voici un exemple des tableaux dans mon document:

Answer 1

cela devrait définir la couleur de toutes les frontières

il ne change pas la visibilité d'une frontière, ou la largeur, ou tout autre attribut

Je l'ai testé sur quelques tables. veuillez le tester en utilisant une COPIE de votre document.

Sub colorBorders() 

    Dim i As Integer 

    Dim tabl As Table 
    For Each tabl In ActiveDocument.Tables   ' iterate all the tables 

     For i = 1 To tabl.Borders.Count    ' iterate all borders for each table 
      tabl.Borders(i).Color = RGB(0, 128, 0) 
     Next i 

    Next tabl 
End Sub