bonjour à partir d'une feuille de calcul excel, je veux faire un programme VBA pour transférer les infos dans un rapport ( proposition de vente, facture, bon de livraison..) fait avec WORD.

Je me suis fait un fichier template qui a le logo de la compagnie, le numéro de page, et de soumission dans l'en-tête. Je sais comment ajouter le nom du client, liste d'item.

Je cherche a savoir comment modifier seulement le numéro de soumission qui est dans l''en-tête .

j'ai ce code, mais il remplace tout l'en-tete

merci de votre aide

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Dim WordApp As Word.Application
Dim WordDoc As Word.Document
 
    Set WordApp = CreateObject("Word.Application")
    WordApp.Visible = True
    Set WordDoc = WordApp.Documents.Open("r:\temp\PROPOSITION TEMPLATE.doc")
    With WordDoc.Sections(1)
       .Headers(wdHeaderFooterPrimary).Range.Text = "Le titre"
        .Headers(wdHeaderFooterPrimary).Range.Paragraphs.Alignment = wdAlignParagraphCenter
        .Footers(wdHeaderFooterPrimary).PageNumbers.Add
   End With