Note: The other languages of the website are Google-translated. Back to English

Ինչպե՞ս տպել 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 այն գործարկելու բանալին, և կհայտնվի Տպելու երկխոսության տուփը, այնուհետև պետք է կազմաձևեք տպման պարամետրերը ըստ ձեր կարիքի, տե՛ս նկար

փաստաթուղթ տպել առանց վերնագրի ստորագիր 1

4, Եվ հետո, կտտացրեք OK տպագրությունը սկսելու համար փաստաթուղթը տպագրվելու է առանց վերնագրի և տողատակի միանգամից:


Բառի արտադրողականության առաջարկվող գործիքներ

 

Kutools Word- ի համար. Word- ի ավելի քան 100 առաջադեմ առանձնահատկություններ, խնայեք ձեր 50% ժամանակը

  • Բարդ և կրկնվող գործողությունները կարող են կատարվել միանգամյա մշակմամբ վայրկյանների ընթացքում:
  • Տեղադրեք բազմաթիվ պատկերներ միանգամից թղթապանակների մեջ Word փաստաթղթում:
  • Միացրեք և միացրեք բազմաթիվ Word ֆայլեր թղթապանակների մեջ մեկում ՝ ձեր ցանկալի պատվերի հետ:
  • Ընթացիկ փաստաթուղթը բաժանեք առանձին փաստաթղթերի `ըստ վերնագրի, հատվածի ընդմիջման կամ այլ չափանիշների:
  • Փոխարկել ֆայլերը Doc- ի և Docx- ի, Docx- ի և PDF- ի միջև, ընդհանուր փոխակերպումների և ընտրության գործիքների հավաքածու և այլն ...

 

Տեսակավորել մեկնաբանությունները ըստ
մեկնաբանություններ (0)
Դեռևս գնահատականներ չկան: Եղիր առաջինը, ով կգնահատի:
Առայժմ ոչ մի մեկնաբանություն չկա
Թողեք ձեր մեկնաբանությունները
Հրապարակում որպես հյուր
×
Գնահատեք այս գրառումը.
0   Անձնավորություններ
Առաջարկվող վայրեր