4 metode za uklanjanje separatora fusnote ili endnote u vašem Word dokumentu

Podijeli sada:

U ovom postu želimo s vama podijeliti 4 metode za uklanjanje razdjelnika fusnota ili krajnjih bilješki u vašem Word dokumentu.

Ako ikada u dokument umetnete bilješku ili krajnju bilješku, vidjet ćete da uvijek postoji vodoravna crta iznad teksta. Ovaj razdjelnik jasno označava područje fusnote ili krajnje bilješke. Ipak, nekim ljudima to može smetati i htjeli bi ga se riješiti. Ovaj će vam članak pružiti 4 metode za to.Uklonite razdjelnik fusnote ili endnote

Metoda 1: Ručno uklonite razdjelnik fusnote

  1. Najprije kliknite karticu "Prikaz", a zatim kliknite prikaz "Nacrt".Kliknite "Prikaz"->Kliknite "Skica"
  2. Zatim kliknite "Reference", a zatim kliknite "Prikaži bilješke" u području "Fusnote".
  3. Sada, ako vaš dokument sadrži i fusnote i bilješke, pojavit će se okvir. Odaberite područje fusnote ili krajnje bilješke, a zatim kliknite "U redu". Sada prvo odaberimo “Prikaži područje fusnote”.Kliknite "Reference"->Kliknite "Prikaži bilješke"->Odaberite područje->Kliknite "U redu"
  4. Pri dnu zaslona otvorit će se okno za bilješke. Pritisnite padajući gumb za odabir "Razdjelnik fusnota".
  5. Zatim kliknite za odabir separatora. Pritisnite "Backspace" ili "Delete" da biste uklonili razdjelnik.Pritisnite padajući gumb->Odaberite "Razdjelnik fusnota"->Odaberite razdjelnik fusnota
  6. Zatim odaberite "Razdjelnik nastavka fusnote" i izbrišite ga.Odaberite "Razdjelnik za nastavak fusnote" -> Odaberite razdjelnik
  7. Kada se riješite separatora, ostat će prazan redak koji ne možete izravno izbrisati. Ovdje dolazimo do rješenja. Izdržite da je odabran "Razdjelnik fusnota".Prazan redak lijevo
  8. Zatim kliknite karticu "Početna" i kliknite gumb sa strelicom u grupi "Odlomak" da biste otvorili dijaloški okvir istog naziva.
  9. Odaberite “Multiple” za “Line spacing”, postavite vrijednost na “0.06” i kliknite “OK”.Kliknite "Početna"->Kliknite gumb sa strelicom da biste otvorili okvir "Odlomak"->Odaberite "Više" za "Prored"->Postavite vrijednost na 0.06->Kliknite "U redu"
  10. Sada je visina praznog retka smanjena na najmanju moguću mjeru. Možete promijeniti prikaz natrag u "Izgled ispisa".Suzite visinu praznog retka

Provjerite rezultat u nastavku:Uklanjanje separatora fusnota

Metoda 2: Ručno uklonite razdjelnik endnote

  1. Ponovite prva 3 koraka u metodi 1, ali ovaj put odaberite "Prikaži područje bilješki" u okviru "Prikaži bilješke".Odaberite "View endnote area"->Kliknite "OK"
  2. U oknu za bilješke koje se otvara pri dnu odaberite "Endnote Separator" i odaberite separator. Zatim ga izbrišite.Odaberite "Razdjelnik endnote"->Odaberite razdjelnik
  3. Zatim odaberite "Endnote Continuation Separator" i odaberite separator te ga izbrišite.Odaberite "Endnote Continuation Separator"->Odaberite separator
  4. Zatim ponovno odaberite "Endnote Separator" klikom na padajući gumb.
  5. I ponovite od koraka 8 do 10 u metodi 1.

Evo rezultata:Učinak uklanjanja separatora endnote

Metoda 3: Uklonite razdjelnik fusnote pokretanjem makronaredbe

  1. Za početak pritisnite “Alt+ F11” da pokrenete VBA editor u Wordu.
  2. Zatim kliknite "Normalno", a zatim karticu "Umetni".
  3. Zatim odaberite "Modul".Kliknite "Normalno"->Kliknite "Umetni"->Kliknite "Modul"
  4. Zatim dvaput kliknite da ga otvorite i tamo zalijepite makronaredbu:
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. Pritisnite "Pokreni".Zalijepite kodove->Kliknite "Pokreni"

Makro će automatski ukloniti sve separatore fusnota i minimizirati ostavljeni prazan redak.

Metoda 4: Uklonite razdjelnik endnote pokretanjem makronaredbe

Slijedite točne korake u 3. metodi za instaliranje i pokretanje makronaredbe. Samo zamijenite kodove ovim:

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

Spremite svoje dokumente

Nijedan softver nije siguran, a to vrijedi i za Word. Općenito, bio je tako koristan alat za obradu teksta. Ipak, postoji neko vrijeme zastoja dok se Word kolabira, ostavljajući vaš dokument oštećenim. Što je još gore, taj dokument je jedina kopija koju imate. Ovo je tako tužno. Ali, ako odaberete kvalificirani uslužni program za popravak dok odjednom, možete završiti s potpuno drugačijim rezultatom.

Uvod za autora:

Vera Chen stručnjakinja je za oporavak podataka u DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući popravak xls i pdf popraviti softverske proizvode. Za više informacija posjetite www.datanumen.com

Podijeli sada:

Komentari su zatvoreni.