Tulevassa artikkelissa keskitymme esittelemään sinulle 3 nopeaa tapaa tulostaa Word-asiakirjasi ilman merkintöjä.
Jos asiakirjasi on tarkistettava, saat varmasti kaikenlaisia merkintöjä asiakirjaan. On tapoja olla näyttämättä niitä näytöllä. Entä jos et tulosta niitä?
Vastaus on myönteinen. Tämän päivän aiheemme on omistettu tarjoamaan sinulle 3 nopeaa ja tehokasta menetelmää tavoitteen saavuttamiseksi.
Tapa 1: Muuta tulostusasetuksia
- Ensinnäkin, napsauta "File" -välilehteä valintanauhassa.
- Napsauta seuraavaksi “Tulosta” -komentoa.
- Siirry sitten Asetukset-osioon ja napsauta ensimmäistä pudotusvalikkoa.
- Poista valikossa valinta Tulosta merkintä -vaihtoehdosta. Näet merkinnät missään oikeanpuoleisessa esikatselussa, mikä on tarkka tulos.
- Valitse lopuksi tulostin, aseta muu muotoilu ja napsauta “Tulosta”.
Tapa 2: Käytä VBA-koodeja
Jos haluat mieluummin automaattisen käsittelyn, makron suorittaminen on paras valinta.
- Ensinnäkin, paina "Alt + F11" käynnistääksesi VBA-editorin Wordissa.
- Napsauta sitten “Normaali”.
- Napsauta sitten Lisää-välilehteä ja valitse sen valikosta Moduuli.
- Kaksoisnapsauta sitten moduulin avaamista ja liitä seuraavat koodit:
Sub PrintDocWithoutComments()
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
Collate:=True, Background:=True, PrintToFile:=False, PrintZoomColumn:=0, _
PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0
End Sub
- Napsauta lopuksi Suorita.
Koodirivillä ”Kopiot: = 1” tulostetun kopion arvoksi asetetaan 1. Voit muuttaa kopion numeroa tarpeen mukaan.
Tapa 3: Useiden asiakirjojen erätulostus ilman merkintöjä
Jos sinulla on nyt suuri määrä tiedostoja, jotka on tulostettava ilman merkintöjä, seuraava makro säästää aikaa.
- Ensin, laita kaikki kohdetiedostot samaan kansioon.
- Asenna ja suorita sitten makro noudattamalla menetelmän 2 vaiheita.
- Korvaa makro tällä:
Sub BatchPrintDocsWithoutComments()
Dim objDoc As Document
Dim strFile As String, strFolder As String
' Initialization
strFolder = InputBox("Enter folder path:")
strFile = Dir(strFolder & "*.docx", vbNormal)
While strFile <> ""
Set objDoc = Documents.Open(FileName:=strFolder & strFile)
Set objDoc = ActiveDocument
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
Collate:=True, Background:=True, PrintToFile:=False, PrintZoomColumn:=0, _
PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0
objDoc.Save
objDoc.Close
strFile = Dir()
Wend
End Sub
- Nyt on syöttökenttä. Syötä kansiopolku, johon tallennat kaikki kohdedokumentit, ja napsauta "OK". Älä unohda polkumerkkijonon viimeistä merkkiä "\".
Selviytyminen asiakirjojen vioittumisesta
Asiakirjojen vioittuminen on ollut usein toistuva teema. Seurauksena, doc-palautus on noussut lavalle. Wordissa on sisäänrakennettu toiminto, joka auttaa palauttamaan rikkoutuneet tiedostot. Valitettavasti se ei joskus toimi hyvin. Siksi tarvitset sopivamman työkalun työn tekemiseen.
Tekijän esittely:
Vera Chen on tietojen palauttamisen asiantuntija DataNumen, Inc., joka on maailman johtava tietojen palautustekniikoissa, mukaan lukien Excel-palautus ja pdf korjata ohjelmistotuotteita. Lisätietoja osoitteessa www.datanumen.com



