bonjour,
je voudrais faire un pied de page mais je n'y arrive pas.
ce que mon code me donne c'est une note de page en bas.
voici mon code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Dim piedpage As Word.Footnote
Try
 
            'oTable.Range.InsertParagraphAfter()
            piedpage = oDoc.Footnotes.Add(oDoc.Bookmarks.Item("\endofdoc").Range)
            piedpage.Range.Text = "Inspection Générale des Finances, Abidjan Plateau, Boulevard Angoulvant, 19 Clozel à l’angle, Avenue A58 Docteur" + vbCrLf + _
            "                       Adresse postale : 04 BP 2876 Abidjan 04 Téléphone : 20 22 51 56 / 20 21 60 16 Fax : 20 21 10 80"
            piedpage.Range.Font.Bold = True
            piedpage.Range.Font.Italic = True
            piedpage.Range.Font.Size = 9
 
        Catch
        End Try
merci pour votre assistance