Note: The other languages of the website are Google-translated. Back to English
Autentificare  \/ 
x
or
x
Înregistrare  \/ 
x

or

Cum se imprimă document Word fără antet și subsol? 

Dacă există antet și subsol în documentul dvs. Word, la imprimarea acestui document, antetul și subsolul vor fi tipărite și în mod implicit. Dar, uneori, nu este nevoie ca antetul și subsolul să fie tipărite. În acest caz, metoda din acest articol vă poate ajuta.

Imprimați document Word fără antet și subsol utilizând codul VBA


Imprimați document Word fără antet și subsol utilizând codul VBA

Pentru a imprima fișierul Word fără antet și subsol, următorul cod VBA vă poate face o favoare, vă rugăm să faceți acest lucru:

1. Țineți apăsat butonul ALT + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. Apoi, faceți clic Insera > Module, copiați și lipiți codul de mai jos în modulul gol deschis:

Cod VBA: Imprimați document Word fără antet și subsol:

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. După introducerea codului de mai sus, vă rugăm să apăsați F5 tasta pentru al rula și va apărea o casetă de dialog Imprimare, apoi ar trebui să configurați setările de imprimare în funcție de nevoile dvs.

imprimare doc fără subsol antet 1

4. Apoi, faceți clic OK pentru a începe tipărirea, documentul va fi tipărit fără antet și subsol deodată.


Instrumente de productivitate Word recomandate

 

Kutools pentru Word - Mai mult de 100 de funcții avansate pentru Word, economisiți-vă 50% timp

  • Operațiile complicate și repetate pot fi efectuate o singură dată în câteva secunde.
  • Inserați mai multe imagini în foldere în documentul Word simultan.
  • Combinați și combinați mai multe fișiere Word din foldere într-unul singur cu comanda dorită.
  • Împărțiți documentul curent în documente separate în funcție de titlu, secțiune de secțiune sau alte criterii.
  • Convertiți fișiere între Doc și Docx, Docx și PDF, colecție de instrumente pentru conversii și selecție obișnuite și așa mai departe ...

 

Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.