Совет. Другие языки - Google-Translated. Вы можете посетить English версия этой ссылки.
Войти
x
or
x
x
Регистрация
x

or

Как печатать документ Word без заголовка и нижнего колонтитула?

Если в документе Word есть верхний и нижний колонтитулы, при печати этого документа верхний и нижний колонтитулы также будут напечатаны по умолчанию. Но иногда вам не нужно печатать верхний и нижний колонтитулы. В этом случае метод в этой статье может помочь вам.

Печать документа Word без верхнего и нижнего колонтитула с использованием кода VBA


Печать документа Word без верхнего и нижнего колонтитула с использованием кода VBA

Чтобы распечатать файл Word без верхнего и нижнего колонтитула, следующий код VBA может оказать вам услугу, пожалуйста, сделайте следующее:

1, Удерживайте ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окна.

2, Затем нажмите Вставить > модуль, скопируйте и вставьте ниже код в открытый пустой модуль:

Код VBA: печать документа Word без верхнего и нижнего колонтитула:

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, После вставки вышеуказанного кода нажмите F5 чтобы запустить его, и появится диалоговое окно «Печать», затем вы должны настроить параметры печати в соответствии с вашими потребностями, см. снимок экрана:

doc print без верхнего колонтитула 1

4, Затем нажмите OK чтобы начать печать, документ будет напечатан без верхнего и нижнего колонтитулов одновременно.



Рекомендуемые инструменты для повышения производительности Word

Kutools For Word - больше, чем расширенные возможности 100 для Microsoft Word, сэкономьте время 50%

  • Сложные и повторяющиеся операции могут быть выполнены одноразовой обработкой за считанные секунды.
  • Вставьте несколько изображений из папок в документ Word одновременно.
  • Объединяйте и объединяйте несколько файлов Word в разных папках в нужном вам порядке.
  • Разделите текущий документ на отдельные документы в соответствии с заголовком 1, разрывом раздела или другими критериями.
  • Конвертировать файлы между Doc и Docx, Docx и PDF, набор инструментов для общих преобразований и выбора, и так далее...

Say something here...
symbols left.
You are guest ( Sign Up? )
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.