2 juiste manieren om een ​​bladwijzernaam in uw Word-document te wijzigen

In het onderstaande artikel willen we u 2 correcte manieren geven om een ​​bladwijzernaam in uw Word-document te wijzigen.

Bij het opstellen van een lang Word-document kunnen bladwijzers en kruisverwijzingen onze beste vriend worden door ons veel tijd te besparen door hetzelfde punt opnieuw uit te leggen. Er kunnen echter onverwachte problemen optreden. Als u bijvoorbeeld een bladwijzernaam wijzigt en de kruisverwijzingen bijwerkt, mislukt dit zeker en eindigt u met verwijzingsfouten zoals hieronder:

De reden is dat de keer dat u de bladwijzernaam wijzigt, u per ongeluk de bladwijzer zelf hebt verwijderd. Nu laten we u 2 methoden zien om dit probleem aan te pakken.

Methode 1: Wijzig de bladwijzernaam en werk kruisverwijzingen handmatig bij

1. Klik om te beginnen op het tabblad 'Invoegen' en vervolgens op 'Bladwijzer' in de groep 'Links'.
2. Klik vervolgens om de gewenste bladwijzer te selecteren en klik op "Ga naar".
3. U zult zien dat de bladwijzerteksten tegen die tijd in selectie zijn. Klik op "Verwijderen".
4. Voer vervolgens een nieuwe bladwijzernaam in en klik op "Toevoegen".
5. Druk op "Alt + F9" om de veldcodes weer te geven.
6. Als u meerdere kruisverwijzingen heeft, raden we u aan de functie “Zoeken en vervangen” te gebruiken. Druk gewoon op "Ctrl + H" om het dialoogvenster "Zoeken en vervangen" te openen.
7. Voer nu "REF DWORDR" in het tekstvak "Zoeken naar" in en "REF DWORDR2" in het veld "Vervangen door". "DWORDR" is de oorspronkelijke bladwijzernaam en "DWORDR2" is de nieuwe.
8. Klik vervolgens op "Alles vervangen".
9. Sluit het vak "Zoeken en vervangen" en druk op "Alt + F9" om de referentie-inhoud opnieuw weer te geven.
10. Druk vervolgens op "Ctrl + A" en "F9" naast om alle velden in het document bij te werken.

Wanneer u de cursor over de kruisverwijzing beweegt, ziet u de nieuwe bladwijzernaam op het schermtipvak.

Methode 2: Wijzig de bladwijzernaam en werk kruisverwijzingen bij via VBA

1. Druk eerst op "Alt + F11" om de VBA-editor te activeren.
2. Ga naar het "Normaal" project om een ​​nieuwe module in te voegen door eerst op het tabblad "Invoegen" te klikken.
3. Kies vervolgens "Module" in het vervolgkeuzemenu.
4. Dubbelklik op de nieuw gemaakte module om de bewerkingsruimte aan de rechterkant te openen.
5. Plak vervolgens de volgende macro daar:

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. Klik op "Uitvoeren" of druk op "F5".
7. Voer nu de originele bladwijzernaam in in het eerste vak dat verschijnt en klik op "OK".
8. Voer de nieuwe naam op de tweede in en klik op "OK".

Ten slotte zal er een vak zijn met het resultaat.

Zorg voor Word-documenten

De kosten van een beschadigd woord document beperkt zich niet tot duizelingwekkende zakelijke verliezen, maar maakt mensen ook emotioneel overstuur. Daarom is het uiterst noodzakelijk om preventieve maatregelen te nemen om de pech te omzeilen, zoals het maken van back-ups van documenten.

Auteur Introductie:

Vera Chen is een expert op het gebied van gegevensherstel in DataNumen, Inc., de wereldleider in technologieën voor gegevensherstel, waaronder xlsx reparatie en pdf reparatie softwareproducten. Voor meer informatie bezoek www.datanumen.com