Problème d'insertion champ dans Word

[john]

Bonjour,

J'ai un soucis lors de l'insertion d'un champ texte en vba.

Voici mon code :

Sub test()
com = "Ceci est un test"
call insert_commentaire (com)
End Sub
'----------------------------------------------
Sub insert_commentaire(commentaire)
'insertion de commentaire
Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _
"COMMENTS "" & " & commentaire & " & "", PreserveFormatting:=True"

'J'ai essayé ce qui suit également mais ça marche pas non plus, j'ai juste le mot "ceci" qui s'affiche
' Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _
"COMMENTS "" & commentaire & "", PreserveFormatting:=True"

End Sub


Et voici le résultat dans mon champ 😱(
& Ceci est un test &

Pouvez-vous me dire comment je peux faire pour obtenir ceci : Ceci est un test

J'ai essayé de différente façon, mais rien à faire 😱(

Merci d'avance.

John

 

[tashiqi]

Re : Problème d'insertion champ dans Word

Bonjour
je n'ai pas tout à fait compris, et je ne suis pas sûr que tu sois au bon endroit, mais ceci semble marcher :
Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _
"COMMENTS """ & commentaire & """, PreserveFormatting:=True"

 

[john]

Re : Problème d'insertion champ dans Word

Oui j'ai vu que pas au bon endroit, sorry 🙁

Effectivement je venais juste de trouver la solution et c'est ok comme tu l'as inscris.

Merci beaucoup.

BàT.

John