4 módszer a lábjegyzet vagy a végjegyzet elválasztó eltávolítására a Word-dokumentumból

Ebben a bejegyzésben 4 módszert szeretnénk megosztani veletek a lábjegyzet- vagy végjegyzet-elválasztó eltávolítására a Word-dokumentumban.

Ha valaha lábjegyzetet vagy végjegyzetet szúr be a dokumentumba, azt fogja tapasztalni, hogy mindig van egy vízszintes vonal a szöveg felett. Ez az elválasztó egyértelműen kijelöli a lábjegyzet vagy a végjegyzet területét. Ennek ellenére egyesek bosszantónak találhatják, és szeretnének megszabadulni tőle. Ez a cikk 4 módszert kínál erre.

1. módszer: Távolítsa el a lábjegyzet-elválasztót manuálisan

1. Először kattintson a „Nézet” fülre, majd a „Vázlat” nézetre.
2. Ezután kattintson a „Hivatkozások” elemre, majd a „Lábjegyzetek” területen kattintson a „Megjegyzések megjelenítése” lehetőségre.
3. Ha a dokumentum lábjegyzeteket és végjegyzeteket is tartalmaz, akkor megjelenik egy doboz. Válassza ki a lábjegyzet vagy a végjegyzet területét, majd kattintson az „OK” gombra. Most először válasszuk a „Lábjegyzetterület megtekintése” lehetőséget.
4. A képernyő alján megnyílik egy jegyzetablak. Kattintson a legördülő gombra a „Lábjegyzet-elválasztó” kiválasztásához.
5. Ezután kattintson az elválasztó kiválasztásához. Nyomja meg a „Backspace” vagy a „Delete” gombot az elválasztó eltávolításához.
6. Ezután válassza a „Lábjegyzet folytatása elválasztó” lehetőséget, és törölje azt is.
7. Ha megszabadul az elválasztótól, egy üres sor marad, amelyet közvetlenül nem törölhet. Itt találunk egy megoldást. Tartsa be, hogy a „Lábjegyzet-elválasztó” legyen kiválasztva.
8. Ezután kattintson a „Kezdőlap” fülre, és kattintson a nyíl gombra a „Bekezdés” csoportban az azonos nevű párbeszédpanel megnyitásához.
9. Válassza a „Többszörös” lehetőséget a „Sortávolság” mezőben, állítsa be az értéket „0.06”-ra, majd kattintson az „OK” gombra.
10. Most az üres vonal magassága a legkisebbre csökken. A nézetet visszaállíthatja a „Nyomtatási elrendezés”-re.

Ellenőrizze az eredményt alább:

2. módszer: A végjegyzet-elválasztó kézi eltávolítása

1. Ismételje meg az 3. módszer első 1 lépését, de ezúttal válassza a „Végjegyzetterület megtekintése” lehetőséget a „Megjegyzések megjelenítése” mezőben.
2. Az alul megnyíló jegyzetpanelen válassza az „Endnote Separator” lehetőséget, és válassza ki az elválasztót. Ezután törölje.
3. Ezután válassza ki az „Endnote Continuation Separator” elemet, válassza ki az elválasztót, és törölje azt.
4. Ezután válassza ki ismét az „Endnote Separator” elemet a legördülő gombra kattintva.
5. És ismételje meg az 8. módszer 10-1. lépését.

Itt van az eredmény:

3. módszer: Távolítsa el a lábjegyzet-elválasztót a makró futtatásával

1. Először nyomja meg az „Alt+F11” billentyűkombinációt a VBA-szerkesztő elindításához a Wordben.
2. Ezután kattintson a „Normál”, majd a „Beszúrás” fülre.
3. Ezután válassza a „Modul” lehetőséget.
4. Ezután kattintson duplán a megnyitáshoz, és illessze be a makrót:

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

5. Kattintson a „Futtatás” gombra.

A makró automatikusan eltávolítja az összes lábjegyzet-elválasztót, és minimalizálja a bal üres sort is.

4. módszer: Távolítsa el a végjegyzet-elválasztót a makró futtatásával

Kövesse a 3. módszer pontos lépéseit a makró telepítéséhez és futtatásához. Csak a kódokat cserélje ki a következőre:

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

Mentse el dokumentumait

Egyetlen szoftver sem bolondbiztos, és ez nagyon igaz a Wordre. Általában nagyon hasznos eszköz volt a szövegszerkesztéshez. Ennek ellenére van némi állásidő, amíg a Word összeomlik, és a dokumentum megsérül. Ami még rosszabb, ez a dokumentum az egyetlen példány, ami megvan. Ez olyan szomorú. De ha egy minősített segédprogramot választ javítás doc egyszerre egészen más eredményt érhet el.

Szerző Bevezetés:

Vera Chen adat-helyreállítási szakértő DataNumen, Inc., amely világelső az adat-helyreállítási technológiák területén, beleértve javítás xls és a pdf javító szoftvertermékek. További információért látogasson el www.datanumen.com