Σε αυτό το άρθρο, θα επικεντρωθούμε στην επίδειξη 4 τρόπων για ομαδική απόκρυψη ή εμφάνιση εικόνων στο έγγραφο του Word.
Κατά καιρούς, είναι πιθανό να κληρονομήσετε ένα έγγραφο με μεγάλο αριθμό εικόνων. Ωστόσο, ίσως σας αποσπούν αρκετά την προσοχή. Στην πραγματικότητα σε παρασύρουν από το να διαβάζεις αποτελεσματικά παρά να είναι επεξηγηματικά. Ή εάν μια εικόνα είναι λήψη κειμένων ή δεδομένων, θα δυσκολευτείτε να ξεχωρίσετε την εικόνα και το περιεχόμενο του εγγράφου.
Μαζική Απόκρυψη εικόνων
Για να μειώσετε τη διακοπή καθώς και να αυξήσετε την ταχύτητα πλοήγησης, μπορείτε να χρησιμοποιήσετε τους παρακάτω τρόπους για να τις αποκρύψετε μια και καλή.
Μέθοδος 1: Αλλαγή με τις ρυθμίσεις του Word
Ακολουθεί ένα παράδειγμα αρχείου με 2 εικόνες. Το πρώτο είναι σε στυλ αναδίπλωσης "Σε συμφωνία με το κείμενο" ενώ το άλλο είναι σε "Σφιχτό". 
- Πρώτα απ 'όλα, ανοίξτε το Word και κάντε κλικ στην καρτέλα "Αρχείο".
- Στη συνέχεια, κάντε κλικ στο "Επιλογές" για να ενεργοποιήσετε το παράθυρο διαλόγου "Επιλογές λέξεων".
- Κάντε κλικ στο «Για προχωρημένους».
- Στη συνέχεια, κάντε κύλιση προς τα κάτω στο τμήμα "Εμφάνιση περιεχομένου εγγράφου". Επιλέξτε το πλαίσιο "Εμφάνιση πλαισίων κράτησης θέσης εικόνων" και καταργήστε την επιλογή του πλαισίου "Εμφάνιση σχεδίων και πλαισίων κειμένου στην οθόνη".
- Τέλος, κάντε κλικ στο "OK".
Τώρα μπορείτε να δείτε ότι η εικόνα σε στυλ "Σύμφωνα με το κείμενο" μετατρέπεται σε πλαίσιο πλαισίου και η δεύτερη είναι εντελώς κρυφή.
Μέθοδος 2: Εκτέλεση μακροεντολής
- Για να ξεκινήσετε, κάντε κλικ στην καρτέλα "Προγραμματιστής" και, στη συνέχεια, στην "Visual Basic" για να ανοίξετε τον επεξεργαστή VBA. Ένας εναλλακτικός τρόπος είναι να πατήσετε "Alt+ F11".
- Στη συνέχεια, κάντε κλικ στο «Κανονικό» έργο και μετά στο «Εισαγωγή».
- Στη συνέχεια, επιλέξτε "Module" για να αποκτήσετε μια νέα ενότητα.
- Κάντε διπλό κλικ και επικολλήστε τους παρακάτω κωδικούς:
Sub HideAllPictures()
Dim nResponse As Integer
nResponse = MsgBox("Do you want to hide all pictures?", 4, "Hide pictures")
If nResponse = 6 Then
With ActiveWindow.View
If .ShowPicturePlaceHolders = False Or .ShowDrawings = True Then
.ShowPicturePlaceHolders = True
.ShowDrawings = False
Else
MsgBox ("All pictures have been hided.")
End If
End With
End If
End Sub
- Μην ξεχάσετε ποτέ να κάνετε κλικ στο "Εκτέλεση".
- Τώρα θα υπάρχει ένα πλαίσιο μηνύματος. Κάντε κλικ στο «Ναι» για ομαδική απόκρυψη όλων των εικόνων.
Εάν λαμβάνετε έγγραφα που περιέχουν πολλές εικόνες σε τακτική βάση, μπορείτε επίσης να εξετάσετε το ενδεχόμενο να αλλάξετε το "Sub HideAllPictures()" σε "Sub AutoOpen". Στη συνέχεια, στο μέλλον, όταν ανοίγετε ένα αρχείο με εικόνες, θα εκτελείτε αυτόματα τη μακροεντολή.
Εμφάνιση εικόνων παρτίδας
Μέθοδος 1: Αναίρεση των αλλαγών στο Word
- Χρησιμοποιήστε τον ίδιο τρόπο για να ανοίξετε πρώτα το πλαίσιο διαλόγου "Επιλογές Word".
- Ομοίως, κάντε κλικ στο "Για προχωρημένους". Μόνο αυτή τη φορά, καταργείτε την επιλογή του πλαισίου "Εμφάνιση θέσεων κράτησης εικόνων" και τσεκάρετε το πλαίσιο "Εμφάνιση σχεδίων και πλαισίων κειμένου στην οθόνη".
- Τέλος, κάντε κλικ στο "OK".
Μέθοδος 2: Εκτέλεση κωδικών VBA
- Επαναλάβετε τα πρώτα 4 βήματα στο "Run Macro" παραπάνω.
- Αλλά αντικαταστήστε τους κωδικούς με τους παρακάτω:
Sub ShowAllPictures()
Dim nResponse As Integer
nResponse = MsgBox("Do you want to show all pictures?", 4, "Show pictures")
If nResponse = 6 Then
With ActiveWindow.View
If .ShowPicturePlaceHolders = True Or .ShowDrawings = False Then
.ShowPicturePlaceHolders = False
.ShowDrawings = True
Else
MsgBox ("No picture is hided.")
End If
End With
End If
End Sub
- Πατήστε το κουμπί "Εκτέλεση".
- Στο παράθυρο μηνύματος που εμφανίζεται, κάντε κλικ στο "Ναι" για να ξεκινήσετε να εμφανίζονται όλες οι εικόνες.
Δεδομένου ότι η απόκρυψη της ενέργειας όλων των εικόνων μπορεί να επηρεάσει κάθε μελλοντικό αρχείο, μπορείτε να αλλάξετε το "Sub ShowAlPictures()" σε "Sub AutoClose()". Στη συνέχεια, κάθε φορά που κλείνετε το έγγραφο, εάν σας υπενθυμίζει την εμφάνιση των κρυφών εικόνων.
Χειριστείτε προβλήματα λέξεων
Κανένα λογισμικό δεν είναι αλάνθαστο. Και αυτό που χρησιμοποιούμε οι περισσότεροι από εμάς καθημερινά, το Word, είναι επίσης ευάλωτο σε σφάλματα και καταστρέφει τα αρχεία μας. Σίγουρα, τίποτα από αυτά δεν θα αποτελέσει πρόβλημα αν έχετε τακτικά αντίγραφα ασφαλείας. Από την άλλη πλευρά, αν δεν έχετε, ένα εξαιρετικό Εργαλείο επιδιόρθωσης διαφθοράς λέξεων είναι αυτό που βοηθάει.
Εισαγωγή συγγραφέα:
Η Vera Chen είναι ειδικός ανάκτησης δεδομένων στο DataNumen, Inc., η οποία είναι ο παγκόσμιος ηγέτης στις τεχνολογίες ανάκτησης δεδομένων, συμπεριλαμβανομένων Εργαλείο επιδιόρθωσης δεδομένων Excel xlsx και pdf επισκευή προϊόντων λογισμικού. Για περισσότερες πληροφορίες επισκεφθείτε www.datanumen.com







