3 võimalust Wordi dokumendi printimiseks ilma all- ja lõpumärkusteta

Sõnalahendused September 28, 2025

Selles artiklis on meil hea meel pakkuda teile 3 praktilist viisi Wordi dokumendi printimiseks ilma all- ja lõpumärkusteta.

All- ja lõpumärkused on abiks ebaselgete punktide illustreerimiseks Wordi dokumendis. Sellegipoolest võib printimise puhul vajada seda joonealuste märkuste ja lõpumärkuste kogumit oma paberil. Kahjuks pole otseseid viise nende printimisest välistamiseks, nagu seda, mida saate teha märgistustega. Selle asemel saate siin valida järgmised lahendused, et saavutada soovitud.Printige oma Wordi dokument ilma all- ja lõpumärkusteta

1. meetod: kasutage vaadet „Mustand”.

  1. Esiteks võtame näitena joonealused märkused. Klõpsake lindil vahekaarti "Vaade".
  2. Järgmisena klõpsake nuppu "Mustand".        Klõpsake "Vaata" -> Klõpsake "Mustand"
  3. Seejärel klõpsake "Viited" ja klõpsake "Kuva märkmed".
  4. Valige avatud kastis kas "Kuva allmärkuse ala" või "Kuva lõppmärkuse ala".
  5. Klõpsake nuppu OK.Klõpsake "Viited" -> "Näita märkmeid" -> Valige vaateala -> klõpsake "OK"
  6. Klõpsake ekraani allosas rippmenüü nuppu, et valida "Kõik allmärkused".
  7. Seejärel vajutage kõigi allmärkuste valimiseks klahvikombinatsiooni Ctrl+A.
  8. Järgmisena vajutage kasti "Font" avamiseks "Ctrl + D".
  9. Märkige ruut "Peidetud" ja klõpsake "OK".Valige "Kõik allmärkused" -> Valige allmärkused -> Ava "Font" kast -> Märkige "Peidetud" -> klõpsake "OK"
  10. Järgmisena valige rippmenüüst "Footnote Separator".
  11. Valige joonealuse märkuse eraldaja.Valige "Allmärkuse eraldaja" -> Valige see
  12. Korrake samme 8 ja 9.
  13. Seejärel valige "Allmärkuse jätkamise eraldaja".
  14. Valige joonealuse märkuse jätkamise eraldaja.Valige "Allmärkuse jätkamise eraldaja" -> Valige see
  15. Korrake samme 8 ja 9.

Nüüd on joonealuste märkuste viitenumbrid põhitekstides endiselt nähtavad. Kui peate ka need peitma, toimige järgmiselt.

  1. Klõpsake vahekaarti "Kodu" ja klõpsake "Otsi" rippmenüü nuppu.
  2. Valige "Täpsem otsing".Klõpsake "Kodu" -> klõpsake rippmenüü nuppu "Otsi" -> valige "Täpsem otsing"
  3. Järgmisena sisestage tekstiväljale „Otsi mis” „^f”. Kui tegelete lõpumärkuste viidetega, sisestage "^e".
  4. Klõpsake "Otsi" ja valige "Põhidokument".
  5. Nüüd on kõik allmärkuste viitenumbrid valikus. Vormindage need peidetud tekstidena.Sisestage "^f" kasti "Leia mida" -> klõpsake "Otsi" -> valige "Põhidokument"

Nüüd on veel viimane käik. Avage "Wordi suvandid", klõpsates "Fail" ja seejärel "Valikud". Avatud kastis klõpsake nuppu "Kuva" ja veenduge, et ruut "Prindi peidetud tekst" poleks märgitud, ja klõpsake "OK".Klõpsake "Kuva" -> Tühjendage märkeruut "Prindi peidetud tekst" -> klõpsake "OK"

Lõpumärkuste puhul on protseduur suuresti sama.

2. meetod: peita stiilid

  1. Kõigepealt avage aken "Stiilid", klõpsates rühmas "Stiilid" noolenuppu.
  2. Näiteks kui otsustame seekord lõpumärkused peita, paremklõpsake stiilil "Lõputekst".
  3. Valige "Muuda".Avage aken "Stiilid" - paremklõpsake lõpumärkuse tekstil -> valige "Muuda"
  4. Kastis "Modify Style" klõpsake "Format" ja valige "Font".
  5. Kastis "Font" märkige ruut "Peidetud" ja klõpsake "OK".Klõpsake "Vorming" -> klõpsake "Font"
  6. Seejärel klõpsake kastis "Muuda stiili" nuppu "OK".
  7. Järgmisena paremklõpsake aknas "Stiilid" "Endnote Reference".
  8. Valige "Vali kõik XX eksemplari".
  9. Nüüd on kõik lõpumärkuste viited valikus. Vormindage need peidetud tekstidena.Valige "Lõppmärkuse viide" -> valige "Vali kõik XX eksemplari(d)"
  10. Nagu näete, on lõpumärkuse eraldaja endiselt alles, seega peate selle ka peitma. Järgige 1. meetodi samme.

3. meetod: kasutage Wordi VBA-d

  1. Esmalt vajutage VBA redaktori avamiseks "Alt + F11".
  2. Järgmisena klõpsake vasakpoolses veerus "Tavaline".
  3. Seejärel klõpsake nuppu "Sisesta" ja "Moodul".Klõpsake "Tavaline" -> Klõpsake "Lisa" -> klõpsake "Moodul"
  4. Topeltklõpsake uue mooduli avamiseks ja kleepige järgmised koodid:
Sub PrintWithoutFootnotesAndEndnotes()
  Dim objDoc As Document
  Dim nFootnoteRefFontColorIndex As Integer
  Dim nFootnoteTxtFontColorIndex As Integer
  Dim nFootnoteSeparatorFontColorIndex As Integer
  Dim nFootnoteContinuationSeparatorColorIndex As Integer
  Dim nEndnoteRefFontColorIndex As Integer
  Dim nEndnoteTxtFontColorIndex As Integer
  Dim nEndnoteSeparatorFontColorIndex As Integer
  Dim nEndnoteContinuationSeparatorColorIndex As Integer
 
  Set objDoc = ActiveDocument
 
  With objDoc
    '  Save the current color index.
    nFootnoteRefFontColorIndex = .Styles("Footnote Reference").Font.ColorIndex
    nFootnoteTxtFontColorIndex = .Styles("Footnote Text").Font.ColorIndex
    nFootnoteSeparatorFontColorIndex = .Footnotes.Separator.Font.ColorIndex
    nFootnoteContinuationSeparatorColorIndex = .Footnotes.ContinuationSeparator.Font.ColorIndex
 
    nEndnoteRefFontColorIndex = .Styles("Endnote Reference").Font.ColorIndex
    nEndnoteTxtFontColorIndex = .Styles("Endnote Text").Font.ColorIndex
    nEndnoteSeparatorFontColorIndex = .Endnotes.Separator.Font.ColorIndex
    nEndnoteContinuationSeparatorColorIndex = .Endnotes.ContinuationSeparator.Font.ColorIndex
 
    .Styles("Footnote Reference").Font.ColorIndex = wdWhite
    .Styles("Footnote Text").Font.ColorIndex = wdWhite
    .Footnotes.Separator.Font.ColorIndex = wdWhite
    .Footnotes.ContinuationSeparator.Font.ColorIndex = wdWhite
 
    .Styles("Endnote Reference").Font.ColorIndex = wdWhite
    .Styles("Endnote Text").Font.ColorIndex = wdWhite
    .Endnotes.Separator.Font.ColorIndex = wdWhite
    .Endnotes.ContinuationSeparator.Font.ColorIndex = wdWhite
  End With
 
  Dialogs(wdDialogFilePrint).Show
 
  With objDoc
    '  Restore the color index
    .Styles("Footnote Reference").Font.ColorIndex = nFootnoteRefFontColorIndex
    .Styles("Footnote Text").Font.ColorIndex = nFootnoteTxtFontColorIndex
    .Footnotes.Separator.Font.ColorIndex = nFootnoteSeparatorFontColorIndex
    .Footnotes.ContinuationSeparator.Font.ColorIndex = nFootnoteContinuationSeparatorColorIndex
 
    .Styles("Endnote Reference").Font.ColorIndex = nEndnoteRefFontColorIndex
    .Styles("Endnote Text").Font.ColorIndex = nEndnoteTxtFontColorIndex
    .Endnotes.Separator.Font.ColorIndex = nEndnoteSeparatorFontColorIndex
    .Endnotes.ContinuationSeparator.Font.ColorIndex = nEndnoteContinuationSeparatorColorIndex
  End With
End Sub
  1. Lõpuks klõpsake nuppu "Käivita".Kleebi koodid -> klõpsake "Käivita"

Makro käivitamisel prinditakse dokument ilma all- ja lõpumärkusteta, säilitades samal ajal need originaalfailis puutumata.

Tegelege Wordi probleemidega

Word võib mingil ajal ebaõnnestuda. See ohustab absoluutselt meie väärtuslike dokumentide turvalisust. Kui teil peaks aga Wordi kasutamisel ilmnema probleeme, on alati olemas tööriist Sõna taastamine.

Autori sissejuhatus:

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

Kommentaarid on suletud.