2 Σωστοί τρόποι αλλαγής ονόματος σελιδοδείκτη στο έγγραφο του Word

Στο παρακάτω άρθρο, θα θέλαμε να σας παρέχουμε 2 σωστούς τρόπους για να αλλάξετε ένα όνομα σελιδοδείκτη στο έγγραφο του Word.

Ενώ συντάσσουμε ένα μακρύ έγγραφο του Word, οι σελιδοδείκτες και οι παραπομπές μπορούν να γίνουν ο καλύτερος φίλος μας, εξοικονομώντας πολύ χρόνο, εξηγώντας ξανά το ίδιο σημείο. Ωστόσο, μπορεί να προκύψει απροσδόκητο ζήτημα. Για παράδειγμα, εάν αλλάξετε ένα όνομα σελιδοδείκτη και ενημερώσετε τις παραπομπές, σίγουρα θα αποτύχετε και θα τερματίσετε με σφάλματα αναφοράς όπως παρακάτω:

Ο λόγος είναι ότι τη στιγμή που αλλάζετε το όνομα του σελιδοδείκτη, διαγράψατε κατά λάθος τον ίδιο τον σελιδοδείκτη. Τώρα θα σας δείξουμε 2 μεθόδους για την αντιμετώπιση αυτού του προβλήματος.

Μέθοδος 1: Αλλαγή του ονόματος σελιδοδείκτη και μη αυτόματη ενημέρωση παραπομπών

1. Για να ξεκινήσετε, κάντε κλικ στην καρτέλα "Εισαγωγή" και, στη συνέχεια, κάντε κλικ στην επιλογή "Σελιδοδείκτης" στην ομάδα "Σύνδεσμοι".
2. Στη συνέχεια, κάντε κλικ για να επιλέξετε τον σελιδοδείκτη προορισμού και κάντε κλικ στην επιλογή "Μετάβαση σε".
3. Θα δείτε τα κείμενα σελιδοδεικτών να είναι επιλεγμένα μέχρι τότε. Κάντε κλικ στο "Διαγραφή".
4. Στη συνέχεια, εισαγάγετε ένα νέο όνομα σελιδοδείκτη και κάντε κλικ στο "Προσθήκη".
5. Πατήστε "Alt + F9" για να εμφανίσετε τους κωδικούς πεδίου.
6. Σε περίπτωση που έχετε πολλές παραπομπές, σας συνιστούμε να χρησιμοποιήσετε τη λειτουργία "Εύρεση και αντικατάσταση". Απλώς πατήστε "Ctrl + H" για να εμφανιστεί το παράθυρο διαλόγου "Εύρεση και αντικατάσταση".
7. Τώρα εισάγετε "REF DWORDR" στο πλαίσιο κειμένου "Εύρεση τι" και "REF DWORDR2" στο "Αντικατάσταση με". Το "DWORDR" είναι το αρχικό όνομα σελιδοδείκτη και το "DWORDR2" είναι το νέο.
8. Στη συνέχεια κάντε κλικ στο "Αντικατάσταση όλων".
9. Κλείστε το πλαίσιο "Εύρεση και αντικατάσταση" και πατήστε "Alt + F9" για να εμφανιστεί ξανά το περιεχόμενο αναφοράς.
10. Στη συνέχεια, πατήστε "Ctrl + A" και "F9" δίπλα για να ενημερώσετε όλα τα πεδία στο έγγραφο.

Όταν μετακινείτε τον κέρσορα πάνω από την παραπομπή, μπορείτε να δείτε το νέο όνομα σελιδοδείκτη στο πλαίσιο άκρου οθόνης.

Μέθοδος 2: Αλλαγή του ονόματος σελιδοδείκτη και ενημέρωση παραπομπών μέσω VBA

1. Αρχικά, πατήστε "Alt + F11" για να ενεργοποιήσετε το πρόγραμμα επεξεργασίας VBA.
2. Μεταβείτε στο έργο "Κανονικό" για να εισαγάγετε μια νέα ενότητα κάνοντας κλικ πρώτα στην καρτέλα "Εισαγωγή".
3. Στη συνέχεια, επιλέξτε "Module" στο αναπτυσσόμενο μενού.
4. Κάντε διπλό κλικ στη νέα μονάδα για να ανοίξετε το χώρο επεξεργασίας στη δεξιά πλευρά.
5. Στη συνέχεια επικολλήστε την ακόλουθη μακροεντολή εκεί:

Sub ChangeTheBookMarkNameAndUpdateCrossReference()
  Dim strBookMarkName As String
  Dim strNewName As String
  Dim objBookMarkRange As Range
  Dim objField As Field
  Dim strFieldCode As String
 
  '  Rename the bookmark name.
  strBookMarkName = InputBox("Enter the bookmark name which you want to change", "BookMark Name", "For example: DWORDR")
  strNewName = InputBox("Enter the New bookmark Name", "New Bookmark Name", "For example: New text")
 
  With ActiveDocument
    If .Bookmarks.Exists(strBookMarkName) Then
      Set objBookMarkRange = .Bookmarks(strBookMarkName).Range
      .Bookmarks(strBookMarkName).Delete
      .Bookmarks.Add Name:=strNewName, Range:=objBookMarkRange
 
      '  Update the cross-reference
      If .Fields.Count >= 1 Then
        For Each objField In .Fields
          strFieldCode = objField.Code.Text
          If strFieldCode = " REF " & strBookMarkName & " \h " Then
            objField.Code.Text = Replace(strFieldCode, strBookMarkName, strNewName, , 1, vbTextCompare)
            objField.Update
            MsgBox ("Code = " & objField.Code & vbCr & "Result = " & objField.Result & vbCr)
          End If 
        Next objField 
      End If
    Else
      MsgBox ("The Bookmark: " & strBookMarkName & " is not founded.")
    End If
  End With

  Set objBookMarkRange = Nothing
End Sub

6. Κάντε κλικ στο "Εκτέλεση" ή πατήστε "F5".
7. Τώρα εισαγάγετε το αρχικό όνομα σελιδοδείκτη στο πρώτο πλαίσιο που εμφανίζεται και κάντε κλικ στο "OK".
8. Εισαγάγετε το νέο όνομα στο δεύτερο και κάντε κλικ στο "OK".

Τέλος, θα υπάρχει ένα κουτί που θα σας δείχνει το αποτέλεσμα.

Φροντίστε τα έγγραφα του Word

Το κόστος ενός κατεστραμμένο Word Το έγγραφο δεν περιορίζεται στη συγκλονιστική απώλεια των επιχειρήσεων, αλλά επίσης κάνει τους ανθρώπους συναισθηματικά απογοητευμένοι. Επομένως, είναι εξαιρετικά απαραίτητο να ληφθούν προληπτικά μέτρα για την παράκαμψη των άτυχων, όπως η δημιουργία αντιγράφων ασφαλείας εγγράφων.

Εισαγωγή συγγραφέα:

Η Vera Chen είναι ειδικός ανάκτησης δεδομένων στο DataNumen, Inc., η οποία είναι ο παγκόσμιος ηγέτης στις τεχνολογίες ανάκτησης δεδομένων, συμπεριλαμβανομένων επισκευή xlsx και pdf επισκευή προϊόντων λογισμικού. Για περισσότερες πληροφορίες επισκεφθείτε www.datanumen.com