Bonjour à Tous,
J'avais trouver mon bonheur dans les pages du Forums mais une autres question c'est poser à moi.
Tout d'abord j'utilise Word XP/2003.
Et voici le code que j'ai trouvé :
j'aimerai en faite créer une texte box au lancement de la MACRO qui rempli une variable pour que "vente" écrite en dur dans la macro soit remplacer par une variable VarVentes par exemple.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 Sub AutomatisedLink() Dim fld As Field Dim stTemp As String For Each fld In ActiveDocument.Fields stTemp = fld.Code stTemp = Replace(stTemp, "Affaires", "Ventes") Debug.Print "stTemp = " & stTemp & vbCrLf fld.Code.Text = stTemp Debug.Print fld.Code Next fld End Sub
J'ai essayé différente texte Box sans succès, mais je pense aussi que c'est surtout un manque de connaissance dans l'utilisation![]()
Donc si vous pouviez m'aider s'il vous plaît
Cordialement,
Partager