Bonjour à tous,
Je voudrais écrire depuis Excel dans un fichier Word en repérant une balise.
j'utilise donc dans mon Code ceci :
J'écris sur trois lignes donc à la place de la BALISE40 ad sur la première ligne ,dc sur la deuxième ligne et la valeur de la Combobox sur le troisième ligne .
Cela marche très bien.
Mon soucis est que je voudrais aussi écrire sur 4 lignes en utilisant qu'une balise, donc j'ai écris :
Mais ça ne marche pas !
Merci par avance si vous avez une idée à me soumettre
Je voudrais écrire depuis Excel dans un fichier Word en repérant une balise.
j'utilise donc dans mon Code ceci :
Code:
leDoc.Content.Find.Execute findtext:="<BALISE40>", ReplaceWith:=ad & vbCrLf & Chr(32) & Chr(32) & Chr(32) & Chr(32) & Chr(32) & Chr(32) & dc & vbCrLf & Chr(32) & Chr(32) & Chr(32) & Chr(32) & Chr(32) & Chr(32) & "-" & " " & ComboBox11.Value, Replace:=wdReplaceAll
J'écris sur trois lignes donc à la place de la BALISE40 ad sur la première ligne ,dc sur la deuxième ligne et la valeur de la Combobox sur le troisième ligne .
Cela marche très bien.
Mon soucis est que je voudrais aussi écrire sur 4 lignes en utilisant qu'une balise, donc j'ai écris :
Code:
leDoc.Content.Find.Execute findtext:="<BALISE40>", ReplaceWith:=ad & vbCrLf & Chr(32) & Chr(32) & Chr(32) & Chr(32) & Chr(32) & Chr(32) & dc & vbCrLf & Chr(32) & Chr(32) & Chr(32) & Chr(32) & Chr(32) & Chr(32) & "-" & " " & ComboBox12.Value & vbCrLf & Chr(32) & Chr(32) & Chr(32) & Chr(32) & Chr(32) & Chr(32) & "-" & " " & ComboBox13.Value, Replace:=wdReplaceAll
Mais ça ne marche pas !
Merci par avance si vous avez une idée à me soumettre
Dernière édition: