kopf und fußzeile nicht mit drucken

[c_83]

Hallo, ich habe in einem word dokument den text in einer tabelle über ein makro formatiert. Und zwar so, dass der text formatiert wird sobald ich über einen selbst erstellten drucken-button gehe. Allerdings habe ich so nicht die möglichkeit beim ducken, die kopf und fußzeile des dokuments nicht mit zu drucken. Wie bekomme ich das hin?: (

Hier mal mein code zur textformatierung...

Sub formatieren_drucken()
Dim i As Integer

Selection.WholeStory
Selection.HomeKey Unit:=wdLine
Selection.MoveDown Unit:=wdLine, Count:=12

With Selection.Font
.Name = "Arial"
.Size = 9
.Bold = False
.Italic = False
.Underline = wdUnderlineNone
.Color = wdColorBlack
End With

For i = 1 To ActiveDocument.Tables.Count
ActiveDocument.Tables(i).Select

With ActiveDocument.Tables(i).Range.Font
.Name = "Arial"
.Size = 9
.Italic = False
.Underline = wdUnderlineNone
.Color = wdColorBlack
End With

formatTable ActiveDocument.Tables(i)
Next i

Selection.WholeStory
Selection.HomeKey Unit:=wdLine
ActiveDocument.PrintOut
End Sub