4 måder til hurtigt at slette alle fodnoter eller slutnoter i dit Word-dokument

I denne artikel er der 4 måder, hvorpå du hurtigt kan slette alle fodnoter eller slutnoter, du har i Word-dokument

I store er slutnoter og fodnoter tekster i dokument, hvor forklaringer og kommentarer går. Men nogle gange, når du arver et dokument fra andre, kan denne form for information være ubrugelig for dig. Derfor bliver du nødt til at fjerne dem. Uden at slette derefter én efter én, her er 4 hurtige måder, som gør det muligt for dig at rydde dem én gang for alle.

Metode 1: Brug "Styles" vinduet

1. Klik først på fanen "Hjem".
2. Klik derefter på pil ned-knappen i "Styles"-gruppen.
3. Næste i vinduet "Styles" skal du finde og placere din markør på "Fodnotereference" eller "Slutnotereference".
4. Og klik på knappen omvendt trekant.
5. Klik nu på "Vælg alle XX-forekomster" i rullemenuen. "XX" her henviser til antallet af fodnoter eller slutnoter, du har. Nu er alle fodnoter eller slutnoter valgt.
6. Tryk endelig på "Slet", og alle er væk på et sekund.

Nogle gange i trin 2 kan du dog ikke finde enten "Fodnotereference" eller "Slutnotereference". Her er trin, du kan tage:

1. Først skal du klikke på "Indstillinger" til højre i vinduet "Styles".
2. Dernæst i dialogboksen "Indstillinger for stilrude" skal du vælge "Alle stilarter" for "Vælg stilarter, der skal vises".
3. Klik derefter på “OK”.
4. Og nu kan du finde både "Footnote Reference" og "Endnote Reference".
5. Gentag trin 4 ovenfor.
6. Klik til sidst på "Vælg alle", og du kan se, at de er i udvalg nu.

Metode 2: Brug funktionen "Find og erstat"

1. Først skal du også klikke på "Hjem"-tabellen.
2. Så denne gang i gruppen "Redigering", vælg "Erstat".
3. Næste i "Find og erstat" dialogboksen, placer markøren ved tekstboksen "Find hvad".
4. Og klik på knappen "Mere" for at udvide flere muligheder.
5. Klik derefter på "Special" nederst.
6. Vælg derefter "Slutnotemærke" eller "Fodnotemærke".
7. Hvis du vælger "Endnote Mark", i tekstboksen "Find hvad", vil du se "^e". Hvis du vælger "Fodnote Mark", vil du sandsynligvis se "^f".
8. Hold nu tekstboksen "Erstat med" tom.
9. Til sidst skal du klikke på "Erstat alle" for at slette derefter alle. Eller klik på "Erstat" for at navigere gennem dem en efter en og beslutte, om du vil slette eller ej.

Her skal du forstå, at hvis nogle af fodnoterne eller slutnoterne indeholder brugerdefinerede mærker, kan de ikke slettes, såsom nedenfor:

Metode 3: Optag makro

For eksempel, hvis vi vil af med alle fodnoter, kan vi optage en makro til metode 2, og vi får koder til gengæld. Og så kan du vælge enten at tildele en knap eller et tastatur til makroen for at bruge det senere. Med hensyn til hvordan man optager en makro, se venligst denne artikel: Sådan fjernes formateringen af ​​indsatte tekster med makro og VBA i dit ord

Følgende koder bruges til at slette fodnoter:

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

For at slette slutnoter skal du bare ændre "^f" til "^e" i kodelinjen i ".Text = "^f"".

Metode 4: Brug VBA-koder

Hvis du foretrækker en endnu hurtigere måde, kan makro hjælpe. Som vist i metode 2 kan nogle af de tilpassede slutnoter eller fodnotemærker ikke elimineres. Men ved hjælp af makro kan det nemt håndteres.

1. Til start med, tryk på "Alt+ F11" for at åbne VBA-editoren.
2. Klik derefter på "Indsæt" for at indsætte et nyt "modul".
3. Dobbeltklik derefter for at åbne modulet. Hvis du nu vil slette alle slutnoter, skal du indsætte følgende koder:

Sub DeleteAllEndnotes()
  Dim objEndnote As Endnote

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

Og for at slette alle fodnoter skal du indsætte disse koder i stedet:

Sub DeleteAllfootnotes()
  Dim objFootnote As Footnote

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

4. Til sidst skal du klikke på "Kør".

Sammenligning af 4 metoder

Reparer beskadigede filer

Generelt, med så mange funktioner, kan vi opnå meget i Word. Alligevel kan det være modtageligt for fejl og korruptioner, hvilket efterlader korrupte Word-filer. Derfor, på dette tidspunkt, bliver du helt sikkert nødt til at få en Ord fejlrettelsesværktøj for at hjælpe dig selv med at hente de værdifulde data.

Forfatter Introduktion:

Vera Chen er en datagendannelsesekspert i DataNumen, Inc., som er verdens førende inden for datagendannelsesteknologier, herunder Værktøj til gendannelse af Excel-filproblemer og pdf produkter til reparation af software. For mere information besøg www.datanumen.com