Ինչպե՞ս Word փաստաթղթում հանել տողատակի / տողատակի առանձնացման գիծը:

Word փաստաթղթում տողատակի ծանոթագրություններ կամ ծանոթագրություններ տեղադրելու ժամանակ դուք կգտնեք, որ տողատակի կամ վերջաբանի տեքստերի վերևում միշտ կա հորիզոնական բաժանարար գիծ: Եթե ​​ցանկանում եք ազատվել այս տարանջատիչ գծերից, փորձեք մեթոդները այս հոդվածում:

Word- ում հանեք տողատակի / վերջաբանի բաժանարար տողը

Հեռացրեք տողատակի / վերջաբանների բաժանարար գիծը VBA կոդով

Word- ում հանեք տողատակի / վերջաբանի բաժանարար տողը

Word- ում կարող եք հեռացնել տողատակի կամ վերջաբանի բաժանարար տողը հետևյալ կերպ.

1. Փաստաթղթում դուք կհեռացնեք դրա տողատակի կամ վերջաբանի բաժանարար տողը, կտտացրեք Դիտել > Draft.

2. Այնուհետեւ կտտացրեք Սայլակ > Showուցադրել նշումները ինչպես ցույց է տրված նկարում

3. Եթե ձեր փաստաթղթում կան և՛ տողատակեր, և՛ վերջաբանումներ, ա Showուցադրել նշումները երկխոսության տուփը կհայտնվի, խնդրում ենք ընտրեք անհրաժեշտ տարբերակ և սեղմեք այն OK կոճակ Այստեղ ես ընտրում եմ Դիտել ծանոթագրությունը տարածքը.

ՆշումԵթե ​​ձեր փաստաթղթում առկա է միայն տողատակը կամ տողատակը, անտեսեք այս քայլը և անցեք 4-րդ փուլի:

4. Հիմա Notes Փաստաթղթի վերջում հատվածը ցուցադրվում է, ընտրեք Եբր. Ծանօթ է Հղումներ բացվող ցուցակը, ընտրեք բաժանարար գիծը և այնուհետև սեղմեք կոճակը ջնջել այն ջնջելու բանալին: Տեսեք,

5. Անցնել դեպի Տպել դասավորությունը փաստաթղթի տեսք:

Դրանից հետո դուք կարող եք տեսնել, որ տողատակի առանձնացնող գիծը հանվում է անմիջապես փաստաթղթից:

ՆշումՎերջաբանների բաժանարար գիծը հանելու համար պարզապես անհրաժեշտ է ստուգել Դիտել վերջաբանը տարածք վերը նշվածում Showուցադրել նշումները երկխոսություն, ապա ընտրեք Վերջաբանների տարանջատիչ է Վերջնագրերը բացվող ցուցակ:

Հեռացրեք տողատակի / վերջաբանների բաժանարար գծերը VBA կոդով

Եթե ​​վերոհիշյալ մեթոդը ձեզ համար անհարմար է, կարող եք փորձել հետևյալ VBA կոդերը ՝ փաստաթղթից արագորեն հեռացնելու տողատակի կամ տողատակի և տողատակի բոլոր բաժանարար գծերը:

1. Փաստաթղթում դուք կհեռացնեք տողատակի բաժանարար գիծը, սեղմեք այն ալտ + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > Մոդուլներ, Դրանից հետո VBA կոդի ներքո պատճենեք Մոդուլի պատուհանում:

VBA կոդ. Փաստաթղթում հանել տողատակի առանձնացման տողը

Sub DeleteTheFootnoteSeparator()
'Updated by ExtendOffice 20181112
    If ActiveDocument.Footnotes.Count < 1 Then Exit Sub
    If ActiveWindow.View.SplitSpecial = wdPaneNone Then
        ActiveWindow.ActivePane.View.Type = wdNormalView
    Else
        ActiveWindow.View.Type = wdNormalView
    End If
    With ActiveWindow.ActivePane.View
        If .Type = wdPrintView Or .Type = wdWebView Or _
        .Type = wdPrintPreview Then
            ActiveWindow.View.SeekView = wdSeekFootnotes
        Else
            ActiveWindow.View.SplitSpecial = wdPaneFootnotes
        End If
    End With
    ActiveWindow.View.SplitSpecial = wdPaneFootnoteSeparator
    With Selection
        .MoveRight Unit:=wdCharacter
        .TypeBackspace
        .TypeBackspace
    End With
    ActiveWindow.View.SplitSpecial = wdPaneFootnoteContinuationSeparator
    With Selection
        .MoveRight Unit:=wdCharacter, Count:=1
        .TypeBackspace
        .TypeBackspace
        With .ParagraphFormat
            .LineSpacingRule = wdLineSpaceMultiple
            .LineSpacing = LinesToPoints(0.06)
        End With
    End With
    ActiveWindow.View.Type = wdPrintView
End Sub

3. Սեղմեք F5 ծածկագիրը գործելու համար: Դրանից հետո փաստաթղթից անմիջապես հանվում են բոլոր տողատակի նշումների բաժանարար գծերը:

ՆշումԵթե ​​ցանկանում եք հեռացնել տողատակի և ծանոթագրի բոլոր տարանջատող գծերը, ստորև ներկայացված VBA կոդը կարող է օգնել:

VBA կոդ. Փաստաթղթում հանել տողատակի և վերջաբանի բաժանարար տողերը

Sub DeleteTheFootnoteSeparator()
'Updated by ExtendOffice 20181112
    If ActiveDocument.Footnotes.Count < 1 Then Exit Sub
    If ActiveWindow.View.SplitSpecial = wdPaneNone Then
        ActiveWindow.ActivePane.View.Type = wdNormalView
    Else
        ActiveWindow.View.Type = wdNormalView
    End If
    With ActiveWindow.ActivePane.View
        If .Type = wdPrintView Or .Type = wdWebView Or _
        .Type = wdPrintPreview Then
            ActiveWindow.View.SeekView = wdSeekFootnotes
        Else
            ActiveWindow.View.SplitSpecial = wdPaneFootnotes
        End If
    End With
    ActiveWindow.View.SplitSpecial = wdPaneFootnoteSeparator
    With Selection
        .MoveRight Unit:=wdCharacter
        .TypeBackspace
        .TypeBackspace
    End With
    ActiveWindow.View.SplitSpecial = wdPaneFootnoteContinuationSeparator
    With Selection
        .MoveRight Unit:=wdCharacter, Count:=1
        .TypeBackspace
        .TypeBackspace
        With .ParagraphFormat
            .LineSpacingRule = wdLineSpaceMultiple
            .LineSpacing = LinesToPoints(0.06)
        End With
    End With
    ActiveWindow.View.SplitSpecial = wdPaneEndnoteSeparator
    With Selection
        .MoveRight Unit:=wdCharacter
        .TypeBackspace
        .TypeBackspace
    End With
    ActiveWindow.View.SplitSpecial = wdPaneEndnoteContinuationSeparator
    With Selection
        .MoveRight Unit:=wdCharacter, Count:=1
        .TypeBackspace
        .TypeBackspace
        With .ParagraphFormat
            .LineSpacingRule = wdLineSpaceMultiple
            .LineSpacing = LinesToPoints(0.06)
        End With
    End With
    ActiveWindow.View.Type = wdPrintView
End Sub

Գրասենյակի արտադրողականության լավագույն գործիքները

Kutools բառի համար - Բարձրացրեք ձեր բառի փորձը Over-ի հետ 100 Ուշագրավ առանձնահատկություններ!

🤖 Kutools AI օգնականՓոխակերպեք ձեր գրածը AI-ի միջոցով - Ստեղծեք բովանդակություն  /  Վերաշարադրել տեքստը  /  Ամփոփել փաստաթղթերը  /  Հարցրեք տեղեկատվության համար Փաստաթղթի հիման վրա, բոլորը Word-ի շրջանակներում

📘 Փաստաթղթերի տիրապետում: Էջերի բաժանում  /  Միաձուլեք փաստաթղթերը  /  Արտահանել ընտրություն տարբեր ձևաչափերով (PDF/TXT/DOC/HTML...)  /  Խմբաքանակի փոխակերպում PDF-ի  /  Արտահանել էջերը որպես պատկերներ  /  Միանգամից մի քանի ֆայլ տպեք...

✏ Բովանդակության խմբագրում: Խմբաքանակի որոնում և փոխարինում Բազմաթիվ Ֆայլերի միջով  /  Չափափոխել բոլոր նկարները  /  Փոխադրել աղյուսակի տողերը և սյունակները  /  Աղյուսակը տեքստի վերափոխել...

🧹 Անհեշտ մաքրություն:Հեռացրու Լրացուցիչ տարածքներ  /  Բաժնի ընդմիջումներ  /  Բոլոր վերնագրերը  /  Տեքստային տուփեր  /  Hyperlinks  / Լրացուցիչ հեռացման գործիքների համար այցելեք մեր Հեռացնել խումբը...

➕ Ստեղծագործական ներդիրներՆերդիր Հազար բաժանիչներ  /  Նշեք վանդակները  /  Ռադիո կոճակներ  /  QR Code  /  Շտրիխ կոդ  /  Անկյունագծային աղյուսակ  /  Հավասարության վերնագիր  /  Նկարի վերնագիր  /  Աղյուսակի վերնագիր  /  Բազմաթիվ նկարներ  / Բացահայտեք ավելին Տեղադրեք խումբը...

🔍 Ճշգրիտ ընտրանքներ: Մատնանշել կոնկրետ էջեր  /  սեղաններ  /  ձեւավորում  /  վերնագրի պարբերություններ  / Ընդլայնել նավարկությունը ավելին Ընտրեք հատկանիշներ...

⭐ Աստղերի բարելավումներ: Արագ նավարկեք ցանկացած վայր  /  կրկնվող տեքստի ավտոմատ տեղադրում  /  անխափան անցում փաստաթղթի պատուհանների միջև  /  11 Փոխակերպման գործիքներ...

???? Ցանկանու՞մ եք փորձել այս հնարավորությունները: Kutools-ը Word-ի համար առաջարկում է ա 60 օր անվճար դատավարություն, առանց սահմանափակումների! 🚀

Անվճար ներբեռնում     Կարդալ ավելին     Գնել հիմա XNUMX