Bonsoir,
Après de nombreuses recherche je n'ai pas réussi à tomber sur ce que je voulais.
J'aimerais pouvoir modifier la valeur texte d'une shape dans Word, lorsque que je viens de créer ce document word via excel.
Voici le code que j'ai essayé sans résultat :
La ligne erreur est la ligne "With WordApp.Documents.Shapes.Range(Array("Zone de texte 10"))" ...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Set WordApp = CreateObject("word.Application") WordApp.Visible = True WordApp.Documents.Open LeRep1 With WordApp.Documents.Shapes.Range(Array("Zone de texte 10")) .Text = sNomDossier End With End Sub
Je pense que la sélection du fichier word n'est pas bonne mais je ne sais pas comment le résoudre..
Merci de votre aide
Cordialement.
Partager