Discussion :

[marti]

logiciels et langages utilisés : Word2000, Excel2000 et Visual Basic 6.3 sous Excel

J'execute une macro vba sous Excel pour colorier en rouge le fond d'une ligne qui se trouve dans un tableau sous Word. Pour ce faire j'utilise l'instruction Tables(1).Rows(j + 1).Shading.BackgroundPatternColor = wdColorRed. Mais j'obtiens comme résultat un fond noir pour la ligne. Idem si je change la couleur.

Merci pour votre aide

[wape]

Bonjour,

La constante wdColorRed est propre à Word. Pour qu'elle soit reconnue par Excel, tu peux utiliser l'une ou l'autre
des solutions suivantes :

1. Dans l'éditeur VBA Excel, cocher la référence "Microsoft Word X.0 Object Library" (cf. menu Outils > Références...)

2. Remplacer la constante wdColorRed par sa valeur, soit 255

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Tables(1).Rows(j + 1).Shading.BackgroundPatternColor = 255

wape

[Bigalo]

Bonjour,

Outre les 2 options de wape, tu peux aussi utiliser une constante vb :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Tables(1).Rows(j + 1).Shading.BackgroundPatternColor = vbRed

[marti]

ok ça marche

mecri beaucoup