4 metoder for å fjerne fotnote- eller sluttnoteskilletegn i Word-dokumentet ditt

I dette innlegget vil vi dele fire metoder for å fjerne fotnote- eller sluttnoteseparator i Word-dokumentet ditt.

Hvis du noen gang setter inn en fotnote eller sluttnote i dokumentet, vil du finne at det alltid er en horisontal linje over tekstene. Denne skillelinjen markerer fotnote- eller sluttnoteområdet tydelig. Likevel kan noen synes det er irriterende og vil gjerne bli kvitt det. Denne artikkelen vil gi deg 4 metoder for å gjøre det.Fjern fotnote eller sluttnoteskilletegn

Metode 1: Fjern fotnoteskilleren manuelt

  1. Klikk først på "Vis"-fanen og klikk deretter på "Utkast"-visning.Klikk "Vis" -> Klikk "Utkast"
  2. Klikk deretter på "Referanser" og deretter "Vis notater" i "Fotnoter"-området.
  3. Hvis dokumentet ditt inneholder både fotnoter og sluttnoter, vil det dukke opp en boks. Velg å se enten fotnote- eller sluttnoteområdet, og klikk deretter på "OK". La oss nå velge "Vis fotnoteområde" først.Klikk "Referanser"->Klikk "Vis notater"->Velg et område->Klikk "OK"
  4. En notatrute skal åpnes nederst på skjermen. Klikk på rullegardinknappen for å velge "Fotnoteseparator".
  5. Klikk deretter for å velge skilletegn. Trykk enten "Backspace" eller "Delete" for å fjerne skilletegnet.Klikk på rullegardinknappen->Velg "Fotnoteseparator"->Velg fotnoteskilletegn
  6. Og velg "Fotnote Continuation Separator" og slett den også.Velg "Fotnote Fortsettelse Separator" -> Velg Separator
  7. Når du kvitter deg med skillet, vil det være en tom linje igjen som du ikke kan slette direkte. Her kommer vi med en løsning. Hold ut at "Fotnoteseparator" er valgt.En tom linje til venstre
  8. Klikk deretter "Hjem"-fanen og klikk på pilknappen i "Avsnitt"-gruppen for å åpne dialogboksen med samme navn.
  9. Velg "Flere" for "Linjeavstand", sett verdien til "0.06" og klikk "OK".Klikk "Hjem"->Klikk pilknappen for å åpne "Avsnitt"-boksen->Velg "Flere" for "Linjeavstand"->Sett verdien til 0.06->Klikk "OK"
  10. Nå er høyden på den tomme linjen redusert til det minste. Du kan endre visningen tilbake til "Utskriftsoppsett".Begrens høyden på den tomme linjen

Sjekk resultatet nedenfor:Fjerning av fotnoteskiller

Metode 2: Fjern Endnote Separator manuelt

  1. Gjenta de første 3 trinnene i metode 1, men velg "Vis sluttnoteområde" denne gangen i "Vis notater"-boksen.Velg "Vis sluttnoteområde" -> Klikk "OK"
  2. I notatruten som er åpen nederst, velg "Endnote Separator" og velg skilletegn. Deretter sletter du den.Velg "Endnote Separator"->Velg Separator
  3. Velg deretter "Endnote Continuation Separator" og velg separatoren og slett den.Velg "Endnote Continuation Separator"->Velg Separator
  4. Velg deretter "Endnote Separator" igjen ved å klikke på rullegardinknappen.
  5. Og gjenta fra trinn 8 til 10 i metode 1.

Her er resultatet:Effekt av å fjerne sluttnoteseparator

Metode 3: Fjern fotnoteskilletegn ved å kjøre makro

  1. Til å begynne med, trykk "Alt + F11" for å utløse VBA-editoren i Word.
  2. Klikk deretter "Normal" og deretter "Sett inn"-fanen.
  3. Og velg "Modul" neste.Klikk "Normal" -> Klikk "Sett inn" -> Klikk "Modul"
  4. Dobbeltklikk deretter for å åpne den og lim inn makroen der:
Sub DeleteTheFootnoteSeparator()

  If ActiveWindow.View.SplitSpecial = wdPaneNone Then
    ActiveWindow.ActivePane.View.Type = wdNormalView
  Else
    ActiveWindow.View.Type = wdNormalView
  End If
 
  If ActiveWindow.ActivePane.View.Type = wdPrintView Or ActiveWindow.ActivePane.View.Type = wdWebView Or _
    ActiveWindow.ActivePane.View.Type = wdPrintPreview Then
    ActiveWindow.View.SeekView = wdSeekFootnotes
  Else
    ActiveWindow.View.SplitSpecial = wdPaneFootnotes
  End If
 
  '  Delete the footnote separator. 
  ActiveWindow.View.SplitSpecial = wdPaneFootnoteSeparator
  Selection.MoveRight Unit:=wdCharacter, Count:=1
  Selection.TypeBackspace
  Selection.TypeBackspace
 
  '  Eliminate the blank line after deleting the footnote separator.
  With Selection.ParagraphFormat
    .LineSpacingRule = wdLineSpaceMultiple
    .LineSpacing = LinesToPoints(0.06)
  End With

  '  Delete the footnote continuation separator. 
  ActiveWindow.View.SplitSpecial = wdPaneFootnoteContinuationSeparator
  Selection.MoveRight Unit:=wdCharacter, Count:=1
  Selection.TypeBackspace
  Selection.TypeBackspace

  '  Eliminate the blank line after deleting the footnote continuation separator. 
  With Selection.ParagraphFormat
    .LineSpacingRule = wdLineSpaceMultiple
    .LineSpacing = LinesToPoints(0.06)
  End With
 
  If ActiveWindow.View.SplitSpecial = wdPaneNone Then
    ActiveWindow.ActivePane.View.Type = wdPrintView
  Else
    ActiveWindow.View.Type = wdPrintView
  End If
End Sub
  1. Klikk "Kjør".Lim inn koder-> Klikk "Kjør"

Makroen skal fjerne alle fotnoteseparatorer automatisk og minimere den tomme linjen igjen også.

Metode 4: Fjern Endnote Separator ved å kjøre makro

Følg de nøyaktige trinnene i metode 3 for å installere og kjøre en makro. Bare bytt ut koder med disse:

Sub DeleteTheEndnoteSeparator()

  If ActiveWindow.View.SplitSpecial = wdPaneNone Then
    ActiveWindow.ActivePane.View.Type = wdNormalView
  Else
    ActiveWindow.View.Type = wdNormalView
  End If
 
  If ActiveWindow.ActivePane.View.Type = wdPrintView Or ActiveWindow.ActivePane.View.Type = wdWebView Or _
    ActiveWindow.ActivePane.View.Type = wdPrintPreview Then
    ActiveWindow.View.SeekView = wdSeekEndnotes
  Else
    ActiveWindow.View.SplitSpecial = wdPaneEndnotes
  End If
 
  '  Delete the endnote separator.
  ActiveWindow.View.SplitSpecial = wdPaneEndnoteSeparator
  Selection.MoveRight Unit:=wdCharacter, Count:=1
  Selection.TypeBackspace
  Selection.TypeBackspace
 
  '  Eliminate the blank line after deleting the endnote separator.
  With Selection.ParagraphFormat
    .LineSpacingRule = wdLineSpaceMultiple
    .LineSpacing = LinesToPoints(0.06)
  End With
 
  '  Delete the endnote continuation separator. 
  ActiveWindow.View.SplitSpecial = wdPaneEndnoteContinuationSeparator
  Selection.MoveRight Unit:=wdCharacter, Count:=1
  Selection.TypeBackspace
  Selection.TypeBackspace

  '  Eliminate the blank line after deleting the endnote continuation separator. 
  With Selection.ParagraphFormat
    .LineSpacingRule = wdLineSpaceMultiple
    .LineSpacing = LinesToPoints(0.06)
  End With
  If ActiveWindow.View.SplitSpecial = wdPaneNone Then
    ActiveWindow.ActivePane.View.Type = wdPrintView
  Else
    ActiveWindow.View.Type = wdPrintView
  End If
End Sub

Lagre dokumentene dine

Ingen programvare er idiotsikker, og dette er veldig sant for Word. Generelt har det vært et så nyttig verktøy for tekstbehandling. Likevel er det noe nedetid mens Word kollapser, og etterlater dokumentet skadet. Hva verre er, det dokumentet er den eneste kopien du har. Dette er så trist. Men hvis du velger et kvalifisert verktøy til reparasjonsdok med en gang kan du ende opp med et helt annet resultat.

Forfatterintroduksjon:

Vera Chen er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologier, inkludert reparere xls og pdf reparere programvareprodukter. For mer informasjon besøk www.datanumen. Med

Kommentarer er stengt.