Remplir un controle de contenu
adrifo07
Messages postés
47
Statut
Membre
-
adrifo07 Messages postés 47 Statut Membre -
adrifo07 Messages postés 47 Statut Membre -
Bonjour,
Dans un document Word nommé "C:\Users\a.faurie\Desktop\essais.docx", j'ai un contrôle de contenu en texte enrichi qui à pour titre : "titre_affaire" et pour baliser "titre".
Depuis un classeur Excel je veux pouvoir écrire et mettre à jour le texte contenu dans ce contrôle de contenu mais je ne sais pas comment faire !
Si quelqu'un a une solution... j'ai cherché toute la journée mais pas moyen !
merci d'avance pour votre aide
Dans un document Word nommé "C:\Users\a.faurie\Desktop\essais.docx", j'ai un contrôle de contenu en texte enrichi qui à pour titre : "titre_affaire" et pour baliser "titre".
Depuis un classeur Excel je veux pouvoir écrire et mettre à jour le texte contenu dans ce contrôle de contenu mais je ne sais pas comment faire !
Si quelqu'un a une solution... j'ai cherché toute la journée mais pas moyen !
merci d'avance pour votre aide
1 réponse
-
j'ai fini par trouver :
' déclaration diverses
Dim WordApp As Word.Application
Dim WordDoc As Word.Document
Dim cc As ContentControl
' bloqué l'affichage de word
WordApp.Visible = False
' mise à jour du controle de contenu par la balise
Set docCCs = ActiveDocument.SelectContentControlsByTag("phase")
If docCCs.Count <> 0 Then
For Each cc In docCCs
cc.Range.Text = phase
Next
End If
et pensé à finir par End pour réinitialiser si non ça marche une fois sur 2 !
