Skip i'r prif gynnwys

Sut i argraffu dogfen Word heb bennawd a throedyn?

Awdur: Xiaoyang Wedi'i Addasu Diwethaf: 2024-08-23

Os oes pennawd a throedyn yn eich dogfen Word, wrth argraffu'r ddogfen hon, bydd y pennawd a'r troedyn yn cael ei argraffu hefyd yn ddiofyn. Ond, weithiau, nid oes angen argraffu'r pennawd a'r troedyn. Yn yr achos hwn, gall y dull yn yr erthygl hon eich helpu chi.

Argraffu dogfen Word heb bennawd a throedyn trwy ddefnyddio cod VBA


Argraffu dogfen Word heb bennawd a throedyn trwy ddefnyddio cod VBA

I argraffu'r ffeil Word heb bennawd a throedyn, gall y cod VBA canlynol ffafrio chi, gwnewch fel hyn:

1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Ac yna, cliciwch Mewnosod > Modiwlau, copïo a gludo islaw'r cod i'r modiwl gwag agored:

Cod VBA: Argraffu dogfen Word heb bennawd a throedyn:

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. Ar ôl mewnosod y cod uchod, pwyswch F5 allwedd i'w redeg, a bydd blwch deialog Argraffu yn cael ei popio allan, yna dylech chi ffurfweddu'r gosodiadau argraffu yn ôl eich angen, gweler y screenshot:

Argraffu blwch deialog

4. Ac yna, cliciwch OK i ddechrau argraffu, bydd y ddogfen yn cael ei hargraffu heb y pennawd a'r troedyn ar unwaith.

Offer Cynhyrchiant Swyddfa Gorau

Kutools am Word - Dyrchafu Eich Profiad Word gyda Dros 100 Nodweddion Rhyfeddol!

🤖 Nodweddion Kutools AI: Cynhyrchu Cynnwys / Ailysgrifennu Testun / Dogfen Holi ac Ateb / Cael Atebion Cyflym / Cyfieithu dogfennau / Dogfen Bwyleg (Fformat Cadw)...

📘 Meistrolaeth Dogfen: Tudalennau Hollti / Uno Dogfennau / Dewis Allforio mewn Fformatau Amrywiol (PDF/TXT/DOC/HTML...) / Trosi swp i PDF...

Golygu Cynnwys: Darganfod Swp ac Amnewid ar draws Ffeiliau Lluosog / Newid Maint Pob Llun / Trawsosod Rhesi Bwrdd a Cholofnau / Trosi Tabl i Testun...

🧹 Ymdrech Glân: swap i ffwrdd Mannau Ychwanegol / Toriadau Adran / Blychau Testun / hypergysylltiadau / Am fwy o offer tynnu, ewch i'r Dileu grŵp...

Mewnosodiadau Creadigol: mewnosod Mil o Wahanwyr / Blychau Gwirio / Botymau Radio / Cod QR / Cod Bar / Lluniau Lluosog / Darganfod mwy yn y Mewnosod grŵp...

🔍 Detholiadau Manwl: pinbwynt Tudalennau Penodol / Tablau / Siapiau / Pennawd Paragraffau / Gwella llywio gyda mwy dewiswch Nodweddion...

Gwelliannau Seren: Llywiwch i Unrhyw Leoliad / Awto-Mewnosod Testun Ailadroddus / Toglo Rhwng Windows Document / 11 Trosi offer...

Tabiau Kutools a Kutools Plus ar y Word Ribbon
???? Eisiau rhoi cynnig ar y nodweddion hyn? Dadlwythwch Kutools ar gyfer Word nawr! 🚀
 

Offer Cynhyrchiant Swyddfa Gorau

Kutools am Word - 100+ Offer ar gyfer Word