2 Rätt sätt att ändra ett bokmärkesnamn i ditt Word-dokument

I den här artikeln vill vi ge dig två korrekta sätt att ändra ett bokmärkesnamn i ditt Word-dokument.

När du skriver ett långt Word-dokument kan bokmärken och korsreferenser bli vår bästa vän genom att spara mycket tid på att förklara samma punkt. Oväntat problem kan dock uppstå. Om du till exempel ändrar ett bokmärkesnamn och uppdaterar korsreferenserna kommer du säkert att misslyckas och sluta med referensfel som nedan:

Anledningen är att den gången du ändrar bokmärkesnamnet raderade du av misstag själva bokmärket. Nu visar vi dig två metoder för att lösa detta problem.

Metod 1: Ändra bokmärkesnamnet och uppdatera korsreferenser manuellt

1. För att börja, klicka på fliken "Infoga" och sedan på "Bokmärke" i gruppen "Länkar".
2. Klicka sedan för att välja önskat bokmärke och klicka på "Gå till".
3. Du kommer att se att bokmärketexterna väljs då. Klicka på "Radera".
4. Ange sedan ett nytt bokmärkesnamn och klicka på “Lägg till”.
5. Tryck på “Alt + F9” för att visa fältkoderna.
6. Om du har flera korsreferenser rekommenderar vi att du använder funktionen "Sök och ersätt". Tryck bara på "Ctrl + H" för att anropa dialogrutan "Sök och ersätt".
7. Ange nu "REF DWORDR" i "Hitta vad" textrutan och "REF DWORDR2" i "Ersätt med" en. “DWORDR” är det ursprungliga bokmärkesnamnet och “DWORDR2” är det nya.
8. Klicka sedan på ”Ersätt alla”.
9. Stäng rutan "Sök och ersätt" och tryck på "Alt + F9" för att visa referensinnehållet igen.
10. Tryck sedan på "Ctrl + A" och "F9" bredvid för att uppdatera alla fält i dokumentet.

När du flyttar markören över korsreferensen kan du se det nya bokmärkesnamnet i skärmens spetsruta.

Metod 2: Ändra bokmärkesnamnet och uppdatera korsreferenser via VBA

1. Tryck först på “Alt + F11” för att utlösa VBA-redigeraren.
2. Gå till "Normal" -projektet för att infoga en ny modul genom att klicka på "Infoga" -fliken först.
3. Välj sedan "Modul" på rullgardinsmenyn.
4. Dubbelklicka på den nyskapade modulen för att öppna redigeringsutrymmet på höger sida.
5. Klistra sedan in följande makro där:

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. Klicka på "Kör" eller tryck på "F5".
7. Ange nu det ursprungliga bokmärkesnamnet i den första rutan som dyker upp och klicka på “OK”.
8. Ange det nya namnet på den andra och klicka på “OK”.

Slutligen kommer det att finnas en ruta som visar resultatet.

Ta hand om Word-dokument

Kostnaden för a skadade Word dokumentet är inte begränsat till svindlande affärsförluster utan gör också människor känslomässigt oroliga. Således är det extremt nödvändigt att vidta förebyggande åtgärder för att kringgå olyckorna, t.ex. säkerhetskopiera dokument.

Författarintroduktion:

Vera Chen är en dataåterställningsexpert i DataNumen, Inc., som är världsledande inom teknik för återställning av data, inklusive xlsx reparation och pdf reparera programvaruprodukter. För mer information besök www.datanumen.com