4 meetodit joonealuse või lõpumärkuse eraldaja eemaldamiseks Wordi dokumendist

Selles postituses jagame teiega nelja meetodit all- või lõppmärkuste eraldaja eemaldamiseks Wordi dokumendist.

Kui sisestate kunagi dokumenti joonealuse või lõpumärkuse, näete, et tekstide kohal on alati horisontaalne joon. See eraldaja märgib joonealuse või lõpumärkuse ala selgelt välja. Siiski võib mõnele inimesele see tüütu olla ja nad tahaksid sellest lahti saada. See artikkel pakub teile 4 võimalust seda teha.Eemaldage allmärkus või lõpumärkuse eraldaja

1. meetod: eemaldage allmärkuste eraldaja käsitsi

  1. Esiteks klõpsake vahekaarti "Vaade" ja seejärel nuppu "Mustand".Klõpsake "Vaata" -> Klõpsake "Mustand"
  2. Järgmisena klõpsake jaotises "Jälused" nuppu "References" ja seejärel "Näita märkmeid".
  3. Nüüd, kui teie dokument sisaldab nii joonealuseid kui ka lõpumärkusi, kuvatakse kast. Valige, kas soovite kuvada joonealuse või lõpumärkuse ala, seejärel klõpsake "OK". Nüüd valime kõigepealt "Vaata joonealuse märkuse ala".Klõpsake "Viited" -> "Näita märkmeid" -> Valige ala -> Klõpsake "OK"
  4. Ekraani allservas avaneb märkmete paneel. Klõpsake rippmenüü nuppu, et valida "Allmärkuse eraldaja".
  5. Seejärel klõpsake eraldaja valimiseks. Eraldaja eemaldamiseks vajutage kas "Tagasilükke" või "Kustuta".Klõpsake rippmenüü nuppu -> valige "Allmärkuse eraldaja" -> valige joonealuse märkuse eraldaja
  6. Ja seejärel valige "Allmärkuse jätkamise eraldaja" ja kustutage ka see.Valige "Allmärkuse jätkamise eraldaja" -> valige eraldaja
  7. Separaatorist vabanemisel jääb tühi rida, mida te ei saa otse kustutada. Siin leiame lahenduse. Pidage meeles, et valitud on „Jääbuse eraldaja”.Tühi rida vasakule
  8. Seejärel klõpsake vahekaarti "Kodu" ja klõpsake rühmas "Lõige" noolenuppu, et avada sama nimega dialoogiboks.
  9. Valige "Reavahe" jaoks "Multiple", määrake väärtuseks "0.06" ja klõpsake "OK".Klõpsake "Avaleht" -> Klõpsake noolenupul, et avada kast "Lõige" -> Valige "Reavahe" jaoks "Mitu" -> Määrake väärtuseks 0.06 -> Klõpsake "OK"
  10. Nüüd vähendatakse tühja rea ​​kõrgust minimaalseks. Saate muuta vaate tagasi valikule "Prindipaigutus".Kitsendage tühja rea ​​kõrgust

Kontrollige tulemust allpool:Allmärkuste eraldaja eemaldamine

2. meetod: eemaldage lõpumärkuse eraldaja käsitsi

  1. Korrake 3. meetodi kolme esimest sammu, kuid valige seekord kastis "Kuva märkmed" valik "Kuva lõpumärkuse ala".Valige "Kuva lõpumärkuse ala" -> klõpsake "OK"
  2. Valige allosas avatud märkmepaanil "Endnote Separator" ja valige eraldaja. Seejärel kustutage see.Valige "Lõppmärkuse eraldaja" -> valige eraldaja
  3. Järgmisena valige "Endnote Continuation Separator" ja valige eraldaja ja kustutage see.Valige "Lõppmärkuse jätkamise eraldaja" -> valige eraldaja
  4. Seejärel valige rippmenüü nupul klõpsates uuesti "Endnote Separator".
  5. Ja korrake meetodi 8 samme 10 kuni 1.

Siin on tulemus:Lõpumärkuse eraldaja eemaldamise mõju

3. meetod: eemaldage allmärkuste eraldaja, käivitades makro

  1. Alustuseks vajutage Wordis VBA redaktori käivitamiseks klahvikombinatsiooni Alt + F11.
  2. Järgmisena klõpsake nuppu "Tavaline" ja seejärel vahekaarti "Lisa".
  3. Ja järgmiseks valige "Moodul".Klõpsake "Tavaline" -> Klõpsake "Lisa" -> klõpsake "Moodul"
  4. Seejärel topeltklõpsake selle avamiseks ja kleepige makro sinna:
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. Klõpsake nuppu "Käivita".Kleebi koodid -> klõpsake "Käivita"

Makro eemaldab automaatselt kõik joonealused märkuste eraldajad ja minimeerib ka tühja rea.

4. meetod: eemaldage lõpumärkuste eraldaja, käivitades makro

Makro installimiseks ja käivitamiseks järgige täpselt 3. meetodi juhiseid. Ainult asendage koodid järgmistega:

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

Salvestage oma dokumendid

Ükski tarkvara pole lollikindel ja see kehtib ka Wordi kohta. Üldiselt on see olnud nii kasulik tööriist tekstitöötluseks. Siiski on Wordi kokkuvarisemisel mõni seisak, mis jätab teie dokumendi kahjustatud. Mis veelgi hullem, see dokument on ainus koopia, mis teil on. See on nii kurb. Aga kui valite selleks kvalifitseeritud utiliidi remondi doc korraga võite saada hoopis teistsuguse tulemuse.

Autori sissejuhatus:

Vera Chen on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas remont xls ja pdf tarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom

Kommentaarid on suletud.