Kako natisniti besedilni dokument brez glave in noge? 

Če sta v dokumentu Word glava in noga, bosta pri tiskanju tega dokumenta privzeto natisnjena tudi glava in noga. Toda včasih vam ni treba natisniti glave in noge. V tem primeru vam lahko pomaga metoda v tem članku.

Natisnite Wordov dokument brez glave in noge z uporabo kode VBA

---

Natisnite Wordov dokument brez glave in noge z uporabo kode VBA

Če želite datoteko Word natisniti brez glave in noge, vam lahko naredite uslugo z naslednjo kodo VBA:

1. Držite tipko ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. In nato kliknite Vstavi > Moduli, kopirajte in prilepite spodnjo kodo v odprti prazen modul:

Koda VBA: natisnite Wordov dokument brez glave in noge:

Sub PrintDocWithoutHeaderFooter()
    Call SetHeaderAndFooter(True)
    Options.PrintHiddenText = False
    Dialogs(wdDialogFilePrint).Show
    Call SetHeaderAndFooter(False)
End Sub
Sub SetHeaderAndFooter(xBool As Boolean)
    Dim xSel As Selection
    For Each s In ActiveDocument.Sections
        s.Headers(wdHeaderFooterEvenPages).Range.Font.Hidden = xBool
        s.Headers(wdHeaderFooterFirstPage).Range.Font.Hidden = xBool
        s.Headers(wdHeaderFooterPrimary).Range.Font.Hidden = xBool
        s.Footers(wdHeaderFooterEvenPages).Range.Font.Hidden = xBool
        s.Footers(wdHeaderFooterFirstPage).Range.Font.Hidden = xBool
        s.Footers(wdHeaderFooterPrimary).Range.Font.Hidden = xBool
    Next s
End Sub

3. Po vstavitvi zgornje kode pritisnite F5 tipko za zagon in izpiše se pogovorno okno Print, nato nastavitve tiskanja konfigurirajte po svojih željah, glejte posnetek zaslona:

4. In nato kliknite OK za začetek tiskanja bo dokument natisnjen brez glave in noge hkrati.