4 võimalust kõigi Wordi dokumendi all- või lõpumärkuste kiireks kustutamiseks

Selles artiklis on neli võimalust, kuidas saate kiiresti kustutada kõik Wordi dokumendis olevad joonealused või lõpumärkused

Suures plaanis on lõpu- ja joonealused märkused dokumendis olevad tekstid, kuhu lähevad selgitused ja kommentaarid. Kuid mõnikord, kui pärate mõnelt dokumendilt teistelt, võib selline teave olla teile kasutu. Seetõttu peate need eemaldama. Ükshaaval kustutamata on siin 4 kiiret viisi, mis võimaldavad teil need lõplikult kustutada.

1. meetod: kasutage stiilide akent

1. Kõigepealt klõpsake vahekaarti "Kodu".
2. Seejärel klõpsake grupis "Stiilid" allanoole nuppu.
3. Järgmisena avage aknas "Stiilid", leidke ja asetage kursor valikule "Allmärkuse viide" või "Lõppmärkuse viide".
4. Ja klõpsake tagurpidi kolmnurga nuppu.
5. Nüüd klõpsake rippmenüüs nuppu „Vali kõik XX eksemplari(d)”. "XX" viitab siin olevate joonealuste või lõpumärkuste arvule. Nüüd on valitud kõik joonealused või lõpumärkused.
6. Lõpuks vajutage nuppu "Kustuta" ja kõik need kaovad sekundiga.

Mõnikord ei pruugi te sammus 2 siiski leida „Jäämärkuse viidet” või „Lõppmärkuse viidet”. Siin on sammud, mida saate teha.

1. Esiteks klõpsake "Stiilid" akna parempoolses servas nuppu "Valikud".
2. Järgmisena valige dialoogiboksis "Style Pane Options" suvand "Vali kuvatavad stiilid" "Kõik stiilid".
3. Seejärel klõpsake nuppu "OK".
4. Ja nüüd leiate nii "Allmärkuse viite" kui ka "Lõppmärkuse viite".
5. Korrake ülaltoodud sammu 4.
6. Lõpuks klõpsake "Vali kõik" ja näete, et need on nüüd valikus.

2. meetod: kasutage funktsiooni Otsi ja asenda

1. Esmalt klõpsake ka tabelit "Kodu".
2. Seejärel valige seekord rühmas "Redigeerimine" "Asenda".
3. Järgmisena asetage dialoogiboksis „Otsi ja asenda” kursor tekstiväljale „Leia mis”.
4. Ja rohkemate valikute laiendamiseks klõpsake nuppu "Veel".
5. Seejärel klõpsake allosas "Eriline".
6. Järgmisena valige "Lõppmärkus" või "Jäljealuse märk".
7. Kui valite "Lõppmärkus", näete tekstikastis "Otsi mis" märki "^e". Kui valite „Allmärkus”, näete tõenäoliselt „^f”.
8. Nüüd jätke tekstiväli "Asenda" tühjaks.
9. Lõpuks klõpsake "Asenda kõik", et kustutada ja seejärel kõik. Või klõpsake nuppu "Asenda", et neid ükshaaval navigeerida ja otsustada, kas kustutada või mitte.

Siin peate mõistma, et kui mõned joonealused või lõpumärkused sisaldavad kohandatud märke, ei saa neid kustutada, näiteks allpool:

3. meetod: salvesta makro

Näiteks kui tahame kõigist joonealustest märkustest lahti saada, saame salvestada meetodi 2 jaoks makro ja saame vastutasuks koodid. Seejärel saate määrata makrole nupu või klaviatuuri, et seda hiljem kasutada. Makro salvestamise kohta lugege seda artiklit: Kuidas eemaldada Wordis makro ja VBA abil kleebitud tekstide vorming

Allmärkuste kustutamiseks kasutatakse järgmisi koode:

Sub DeleteFootnotes()
  Selection.Find.ClearFormatting
  Selection.Find.Replacement.ClearFormatting
  With Selection.Find
    .Text = "^f"
    .Replacement.Text = ""
    .Forward = True
    .Wrap = wdFindContinue
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
  End With
    Selection.Find.Execute Replace:=wdReplaceAll
End Sub

Muide, lõpumärkuste kustutamiseks peate lihtsalt "^f" koodireas "^e" muutma..Text = "^f"".

4. meetod: kasutage VBA koode

Kui eelistate veelgi kiiremat viisi, võib makro aidata. Nagu on näidatud 2. meetodis, ei saa mõnda kohandatud lõpu- või joonealuse märki eemaldada. Kuid makro abil saab seda hõlpsalt käsitseda.

1. Et start, vajutage VBA redaktori avamiseks klahvikombinatsiooni Alt+ F11.
2. Järgmisena klõpsake uue mooduli sisestamiseks nuppu "Insert".
3. Seejärel topeltklõpsake mooduli avamiseks. Kui soovite nüüd kustutada kõik lõpumärkused, kleepige järgmised koodid:

Sub DeleteAllEndnotes()
  Dim objEndnote As Endnote

  For Each objEndnote In ActiveDocument.Endnotes
    objEndnote.Delete
  Next
End Sub

Kõigi joonealuste märkuste kustutamiseks kleepige selle asemel need koodid:

Sub DeleteAllfootnotes()
  Dim objFootnote As Footnote

  For Each objFootnote In ActiveDocument.Footnotes
    objFootnote.Delete
  Next
End Sub

4. Lõpuks klõpsake nuppu "Käivita".

4 meetodi võrdlus

Parandage kahjustatud failid

Üldiselt suudame nii paljude funktsioonidega Wordis palju saavutada. Siiski võib see olla vastuvõtlik vigadele ja korruptsioonidele, jättes rikutud Wordi failid maha. Seetõttu peate sel ajal kindlasti hankima a Wordi veaparandustööriist et aidata endal väärtuslikke andmeid hankida.

Autori sissejuhatus:

Vera Chen on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas Exceli failiprobleemide taastamise tööriist ja pdf tarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom