Στο επόμενο άρθρο, θα επικεντρωθούμε στο να σας παρουσιάσουμε 3 γρήγορους τρόπους για να εκτυπώσετε το έγγραφο του Word χωρίς σημάνσεις.
Εάν το έγγραφό σας απαιτεί αναθεώρηση, τότε σίγουρα θα λάβετε όλα τα είδη σημάνσεων στο έγγραφό σας. Υπάρχουν τρόποι να μην εμφανίζονται στην οθόνη. Τι θα λέγατε να μην τα εκτυπώσετε;
Η απάντηση είναι θετική. Και το θέμα μας σήμερα είναι αφιερωμένο στο να σας παρέχουμε 3 γρήγορες και αποτελεσματικές μεθόδους για την επίτευξη του στόχου.
Μέθοδος 1: Αλλαγή επιλογών εκτύπωσης
- Αρχικά, κάντε κλικ στην καρτέλα "Αρχείο" στην Κορδέλα.
- Στη συνέχεια κάντε κλικ στην εντολή «Εκτύπωση».
- Στη συνέχεια, μεταβείτε στην ενότητα "Ρυθμίσεις" και κάντε κλικ στο πρώτο αναπτυσσόμενο πλαίσιο.
- Στο μενού, καταργήστε την επιλογή "Εκτύπωση σήμανσης". Δεν θα δείτε σημάνσεις πουθενά στη δεξιά προεπισκόπηση, το οποίο είναι το ακριβές αποτέλεσμα που θα έχετε.
- Τέλος, επιλέξτε εκτυπωτή και ορίστε άλλη μορφοποίηση και κάντε κλικ στο «Εκτύπωση».
Μέθοδος 2: Χρησιμοποιήστε κωδικούς VBA
Σε περίπτωση που προτιμάτε την αυτόματη επεξεργασία, τότε η εκτέλεση μιας μακροεντολής είναι η κορυφαία επιλογή σας.
- Πρώτα, πατήστε "Alt+ F11" για να ενεργοποιήσετε τον επεξεργαστή VBA στο Word.
- Στη συνέχεια, κάντε κλικ στο "Normal".
- Στη συνέχεια κάντε κλικ στην καρτέλα "Εισαγωγή" και επιλέξτε "Ενότητα" στο μενού της.
- Στη συνέχεια, κάντε διπλό κλικ για να ανοίξετε τη μονάδα και να επικολλήσετε τους ακόλουθους κωδικούς:
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
- Τέλος, κάντε κλικ στο "Εκτέλεση".
Η γραμμή κώδικα "Copies:=1" ορίζει το αντίγραφο εκτύπωσης στο 1. Μπορείτε να αλλάξετε τον αριθμό αντιγράφου όπως απαιτείται.
Μέθοδος 3: Μαζική εκτύπωση πολλαπλών εγγράφων χωρίς σημάνσεις
Τώρα, εάν έχετε μεγάλο αριθμό αρχείων που πρέπει να εκτυπώσετε χωρίς σήμανση, η παρακάτω μακροεντολή θα σας εξοικονομήσει χρόνο.
- Αρχικά, τοποθετήστε όλα τα έγγραφα-στόχους στον ίδιο φάκελο.
- Στη συνέχεια, εγκαταστήστε και εκτελέστε τη μακροεντολή που ακολουθεί τα βήματα στη μέθοδο 2.
- Αντικαταστήστε τη μακροεντολή με αυτήν:
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
- Τώρα υπάρχει ένα πλαίσιο εισαγωγής. Εισαγάγετε τη διαδρομή του φακέλου όπου αποθηκεύετε όλα τα έγγραφα προορισμού και κάντε κλικ στο "OK". Μην ξεχάσετε το τελευταίο "\" στη συμβολοσειρά διαδρομής.
Αντιμετώπιση της διαφθοράς εγγράφων
Η διαφθορά εγγράφων είναι ένα συχνά επαναλαμβανόμενο θέμα. Ως συνέπεια, ανάκτηση εγγράφων ανέβηκε στη σκηνή. Υπάρχει μια ενσωματωμένη λειτουργία στο Word που σας βοηθά να ανακτήσετε τα κατεστραμμένα αρχεία. Δυστυχώς, μερικές φορές δεν λειτουργεί καλά. Επομένως, χρειάζεστε ένα πιο κατάλληλο εργαλείο για να κάνετε τη δουλειά.
Εισαγωγή συγγραφέα:
Η Vera Chen είναι ειδικός ανάκτησης δεδομένων στο DataNumen, Inc., η οποία είναι ο παγκόσμιος ηγέτης στις τεχνολογίες ανάκτησης δεδομένων, συμπεριλαμβανομένων Ανάκτηση του Excel και pdf επισκευή προϊόντων λογισμικού. Για περισσότερες πληροφορίες επισκεφθείτε www.datanumen.com



