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