3 načina za ispis vašeg Word dokumenta bez fusnota i bilješki

Podijeli sada:

U ovom članku sa zadovoljstvom vam možemo ponuditi 3 praktična načina za ispis vašeg Word dokumenta bez fusnota i bilješki.

Fusnote i krajnje bilješke korisne su za ilustraciju nejasnih točaka u Word dokumentu. Uz to, kada je riječ o ispisu, možda će vam trebati ta skupina fusnota i bilješki nigdje na vašem papiru. Nažalost, nema izravnih načina da ih isključite iz ispisa kao što možete učiniti s oznakama. Umjesto toga, ovdje možete odabrati sljedeća rješenja kako biste postigli ono što želite.Ispišite svoj Word dokument bez fusnota i bilješki

Metoda 1: Radite u prikazu "skica".

  1. Prvo, uzmimo primjer fusnota. Kliknite karticu "Prikaz" na vrpci.
  2. Zatim kliknite na "Skica".        Kliknite "Prikaz"->Kliknite "Skica"
  3. Zatim kliknite "Reference" i kliknite "Prikaži bilješke".
  4. U otvorenom okviru odaberite okvir "Prikaži područje fusnote" ili "Prikaži područje završne bilješke".
  5. Kliknite "U redu".Kliknite "Reference"->Kliknite "Prikaži bilješke"->Odaberite područje pregleda->Kliknite "U redu"
  6. Na dnu zaslona kliknite gumb padajućeg izbornika kako biste odabrali "Sve fusnote".
  7. Zatim pritisnite “Ctrl+ A” za odabir svih fusnota.
  8. Zatim pritisnite “Ctrl+ D” da biste otvorili okvir “Font”.
  9. Označite okvir "Skriveno" i kliknite "U redu".Odaberite "Sve fusnote"->Odaberite fusnote->Otvorite okvir "Font"->Označite "Skriveno"->Kliknite "U redu"
  10. Zatim odaberite "Razdjelnik fusnota" na padajućem izborniku.
  11. Odaberite razdjelnik fusnote.Odaberite "Razdjelnik fusnote"->Odaberi
  12. Ponovite korake 8 i 9.
  13. Zatim odaberite "Razdjelnik nastavka fusnote".
  14. Odaberite razdjelnik za nastavak fusnote.Odaberite "Razdjelnik nastavka fusnote"->Odaberi
  15. Ponovite korake 8 i 9.

Sada će referentni brojevi fusnota i dalje biti vidljivi u glavnim tekstovima. Ako i njih trebate sakriti, slijedite ove korake:

  1. Kliknite karticu "Početna" i kliknite padajući gumb na "Pronađi".
  2. Odaberite "Napredno traženje".Kliknite "Početna"->Kliknite padajući gumb na "Traži"->Odaberite "Napredno traženje"
  3. Zatim unesite "^f" u tekstualni okvir "Pronađi što". Unesite "^e" ako imate posla s referencama u bilješkama.
  4. Kliknite "Pronađi u" i odaberite "Glavni dokument".
  5. Sada su svi referentni brojevi fusnota u izboru. Oblikujte ih kao skrivene tekstove.Unesite "^f" u okvir "Pronađi što"->Kliknite "Pronađi u"->Odaberite "Glavni dokument"

Sada postoji još jedan posljednji potez. Otvorite okvir "Word Options" klikom na "File", a zatim na "Options". U otvorenom okviru kliknite "Prikaz" i provjerite da okvir "Ispiši skriveni tekst" nije označen i kliknite "U redu".Kliknite "Prikaz"->Poništite okvir "Ispiši skriveni tekst"->Kliknite "U redu"

Za krajnje bilješke postupak je gotovo isti.

Metoda 2: Sakrij stilove

  1. Prije svega, otvorite prozor "Stilovi" klikom na gumb sa strelicom u grupi "Stilovi".
  2. Na primjer, ako ovaj put odlučimo sakriti endnote, desni klik na stil "Endnote Text".
  3. Odaberite "Izmijeni".Otvorite prozor "Stilovi"->Desni klik na tekst endnote->Odaberite "Izmijeni"
  4. U okviru "Izmijeni stil" kliknite "Format" i odaberite "Font".
  5. U okviru "Font" označite okvir "Skriveno" i kliknite "U redu".Kliknite "Format"->Kliknite "Font"
  6. Zatim kliknite "OK" u okviru "Modify Style".
  7. Zatim u prozoru "Stilovi" desnom tipkom miša kliknite "Referenca endnote".
  8. Odaberite "Odaberi svih XX instanci".
  9. Sada su sve reference endnote u odabiru. Oblikujte ih kao skrivene tekstove.Odaberite "Endnote Reference" -> Odaberite "Select All XX Instance(s)"
  10. Kao što vidite, separator završnih bilješki je još uvijek tu, pa i njega morate sakriti. Slijedite korake u metodi 1.

Metoda 3: Koristite Word VBA

  1. Najprije pritisnite “Alt+ F11” da otvorite VBA editor.
  2. Zatim kliknite "Normalno" u lijevom stupcu.
  3. Zatim kliknite "Umetni" i "Modul".Kliknite "Normalno"->Kliknite "Umetni"->Kliknite "Modul"
  4. Dvaput kliknite za otvaranje novog modula i zalijepite sljedeće kodove:
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. Na kraju kliknite "Pokreni".Zalijepite kodove->Kliknite "Pokreni"

Pokretanje makronaredbe će ispisati dokument bez fusnota i krajnjih bilješki, dok će one ostati netaknute na izvornoj datoteci.

Pozabavite se problemima s riječima

Riječ ponekad može zakazati. Ovo apsolutno ugrožava sigurnost naših vrijednih dokumenata. Međutim, ako naiđete na probleme u korištenju Worda, uvijek postoji alat za to Oporavak riječi.

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 oporaviti excel i pdf popraviti softverske proizvode. Za više informacija posjetite www.datanumen.com

Podijeli sada:

Komentari su zatvoreni.