There are ways to remove header and footer while printing documents. In today’s article, we will introduce you 3 methods to print your Word document without header and footer.
A lot of Word documents have header and footer inserted. It’s not a big deal when they are on screen. However, if you want to print only the document texts instead of all contents including header and footer, you must come out a way to remove them.
And there are 3 methods we can offer.
Method 1: Remove Header and Footer
The easiest way is, of course, to delete them once for all. Nevertheless, we suggest you taking a backup or preserving a copy of the document with header and footer in case you will need them later.
- Firstly, double click to enter the header or footer area.
- Then click “Header” or “Footer” under “Design” tab.
- Next on drop-down menu, choose “Remove Header” or “Remove Footer” respectively.
- Finally, double click on space outside the header or footer area to exit.
By the way, this method works best when all headers or footers are the same in the whole document. This means when there are multiple sections where headers and footers do not link to previous, you will have to remove headers and footers repeatedly.
Method 2: Format Header and Footer as Hidden Texts
- First thing, enter the header or footer by double clicking.
- Then press “Ctrl+ A” to select all contents there.
- Next press “Ctrl+ D” to open the “Font” dialog box.
- In the box, check the “Hidden” box under “Effects”.
- Lastly, click “OK”.
- Use the same way to hide footers.
Method 3: Run Word Macro
- First and foremost, click “Developer” tab then the “Visual Basic”. Or press “Alt+ F11” instead to trigger VBA editor.
- Next on the left column in the editor, click on “Normal”.
- Then click “Insert” tab and choose “Module”.
- And double click on the new module under “Normal” project to bring out the editing area.
- Paste the following codes:
Sub HideHeadersAndFooters() Dim objDoc As Document Dim nSection As Long Set objDoc = ActiveDocument With objDoc For nSection = .Sections.Count To 1 Step -1 .Sections(nSection).Headers(wdHeaderFooterPrimary).Range.Font.Hidden = True .Sections(nSection).Headers(wdHeaderFooterEvenPages).Range.Font.Hidden = True .Sections(nSection).Headers(wdHeaderFooterFirstPage).Range.Font.Hidden = True .Sections(nSection).Footers(wdHeaderFooterPrimary).Range.Font.Hidden = True .Sections(nSection).Footers(wdHeaderFooterEvenPages).Range.Font.Hidden = True .Sections(nSection).Footers(wdHeaderFooterFirstPage).Range.Font.Hidden = True Next End With Word.Application.Options.PrintHiddenText = False End Sub
- Lastly, click “Run” button.
After running the macro, all headers and footers should be gone, you can print them out. The coming macro can be run to show the headers and footers again:
Sub ShowHiddenHeadersAndFooters() Dim objDoc As Document Dim nSection As Long Set objDoc = ActiveDocument With objDoc For nSection = .Sections.Count To 1 Step -1 .Sections(nSection).Headers(wdHeaderFooterPrimary).Range.Font.Hidden = False .Sections(nSection).Headers(wdHeaderFooterEvenPages).Range.Font.Hidden = False .Sections(nSection).Headers(wdHeaderFooterFirstPage).Range.Font.Hidden = False .Sections(nSection).Footers(wdHeaderFooterPrimary).Range.Font.Hidden = False .Sections(nSection).Footers(wdHeaderFooterEvenPages).Range.Font.Hidden = False .Sections(nSection).Footers(wdHeaderFooterFirstPage).Range.Font.Hidden = False Next End With End Sub
Fix Word Problems
Word is not foolproof. Therefore it easily gets shut down or collapsed. This absolutely poses a great danger for our file security. What’s worse, when the unexpected happens, it would be such a pain if you can’t retrieve information back. In a word, you are going to need a Word fix program to help you efficiently recover corrupted files.
Author Introduction:
Vera Chen is a data recovery expert in DataNumen, Inc., which is the world leader in data recovery technologies, including xlsx fix and pdf repair software products. For more information visit www.datanumen.com
Very nice article. I definitely love this site. Continue the good work!