Σε αυτό το άρθρο, θα θέλαμε να σας παρέχουμε 2 έξυπνους τρόπους για να εμφανίσετε όλους τους σελιδοδείκτες στο έγγραφο του Word.
Κάθε καιρό, εισάγουμε σελιδοδείκτη για μια επιλογή κειμένου που θέλουμε να το επισκεφτούμε αργότερα. Όμως, η φύση του σελιδοδείκτη στο Word καθιστά δύσκολη την αναγνώριση. Με μια άλλη λέξη, δεν μπορούμε να δούμε σελιδοδείκτες απευθείας χωρίς εναλλαγή ορισμένων επιλογών στο Word. 
Αυτό το άρθρο είναι αφιερωμένο στο να σας βοηθήσει να δείτε σελιδοδείκτες με σαφή τρόπο. Μπορείτε να επιλέξετε οποιονδήποτε τρόπο για να εξασκηθείτε.
Μέθοδος 1: Εμφάνιση αγκυλών σελιδοδεικτών
- Πρώτα απ 'όλα, κάντε κλικ στην καρτέλα "Αρχείο" στην Κορδέλα.
- Στη συνέχεια, κάντε κλικ στο "Επιλογές" για να ανοίξετε το παράθυρο διαλόγου "Επιλογές λέξεων".
- Στη συνέχεια, κάντε κλικ στο "Advanced" στην αριστερή στήλη.
- Κάντε κύλιση προς τα κάτω στην ενότητα "Εμφάνιση περιεχομένου εγγράφου" και επιλέξτε το πλαίσιο "Εμφάνιση σελιδοδεικτών".
- Τέλος, κάντε κλικ στο "OK" για να αποθηκεύσετε την τροποποίηση.
Τώρα υπάρχουν αγκύλες γύρω από αντικείμενα σελιδοδείκτη. Μπορείτε να δείτε ότι αυτές οι αγκύλες είναι σε γκρι χρώμα που μερικές φορές δεν είναι τόσο εμφανείς. Και μπορείτε να τα συγχέετε με κανονικά αγκύλες.
Επομένως, θέλουμε να σας προτείνουμε μια μακροεντολή για να επισημάνετε τους σελιδοδείκτες για να τους ξεχωρίζετε με καλύτερο τρόπο.
Μέθοδος 2: Επισημάνετε πολλούς σελιδοδείκτες
- Αρχικά, πατήστε "Alt + F11" για να καλέσετε τον επεξεργαστή VBA.
- Στη συνέχεια κάντε κλικ στο "Κανονικό" έργο.
- Στη συνέχεια, κάντε κλικ στην καρτέλα "Εισαγωγή" στη γραμμή μενού και επιλέξτε "Ενότητα" στο αναπτυσσόμενο μενού.
- Και κάντε διπλό κλικ στη νέα ενότητα για να ανοίξετε τον χώρο επεξεργασίας στη δεξιά πλευρά.
- Επικολλήστε την ακόλουθη μακροεντολή εκεί:
Sub HighlightBookmarkedItemsInADoc()
Dim objBookmark As Bookmark
Dim objDoc As Document
Application.ScreenUpdating = False
Set objDoc = ActiveDocument
With objDoc
For Each objBookmark In .Bookmarks
objBookmark.Range.HighlightColorIndex = wdBrightGreen
Next objBookmark
End With
Application.ScreenUpdating = True
End Sub
- Τελευταίο αλλά όχι το λιγότερο, κάντε κλικ στο "Εκτέλεση" ή πατήστε "F5".
Το επόμενο πράγμα που βλέπετε είναι όλοι οι σελιδοδείκτες να επισημαίνονται με πράσινο χρώμα, όπως παρακάτω:
Πάνω από τη μακροεντολή επισημάνετε όλους τους σελιδοδείκτες στο τρέχον ενεργό έγγραφο. Σε περίπτωση που υπάρχουν πολλά έγγραφα για επεξεργασία, τότε χρειάζεστε αυτήν τη μακροεντολή:
Sub HighlightBookmarkedItemsInMultiDoc()
Dim StrFolder As String
Dim strFile As String
Dim objDoc As Document
Dim dlgFile As FileDialog
Set dlgFile = Application.FileDialog(msoFileDialogFolderPicker)
With dlgFile
If .Show = -1 Then
StrFolder = .SelectedItems(1) & "\"
Else
MsgBox "You need to select a folder first!"
Exit Sub
End If
End With
strFile = Dir(StrFolder & "*.docx", vbNormal)
While strFile <> ""
Set objDoc = Documents.Open(FileName:=StrFolder & strFile)
Set objDoc = ActiveDocument
With objDoc
For Each objBookmark In .Bookmarks
objBookmark.Range.HighlightColorIndex = wdBrightGreen
Next objBookmark
End With
objDoc.Save
objDoc.Close
strFile = Dir()
Wend
End Sub
Πριν εκτελέσετε αυτήν τη μακροεντολή, πρέπει να τοποθετήσετε όλα τα έγγραφα-στόχους στον ίδιο φάκελο. Η εκτέλεση της μακροεντολής θα ενεργοποιήσει το παράθυρο "Αναζήτηση". Απλώς επιλέξτε τον φάκελο στον οποίο αποθηκεύετε τα έγγραφά σας.
Βοηθητικό πρόγραμμα επισκευής εγγράφων
Εάν συναντήσετε Βλάβη λέξεων, υπάρχει μεγάλη πιθανότητα να εξαλείψει ορισμένες κρίσιμες πληροφορίες από τον υπολογιστή σας. Δεν μπορεί να είναι μεγάλη υπόθεση εάν έχετε ένα πιο πρόσφατο αντίγραφο ασφαλείας για αναφορά. Ωστόσο, εάν όχι, θα χρειαστείτε αμέσως ένα εργαλείο επισκευής.
Εισαγωγή συγγραφέα:
Η Vera Chen είναι ειδικός ανάκτησης δεδομένων στο DataNumen, Inc., η οποία είναι ο παγκόσμιος ηγέτης στις τεχνολογίες ανάκτησης δεδομένων, συμπεριλαμβανομένων επισκευή xlsx και pdf επισκευή προϊόντων λογισμικού. Για περισσότερες πληροφορίες επισκεφθείτε www.datanumen.com