2 teisingi būdai, kaip pakeisti žymės pavadinimą „Word“ dokumente

Šiame straipsnyje norėtume pateikti 2 teisingus būdus, kaip pakeisti žymės pavadinimą „Word“ dokumente.

Rengiant ilgą „Word“ dokumentą, žymės ir kryžminės nuorodos gali tapti geriausiu mūsų draugu, nes sutaupome daug laiko iš naujo paaiškindami tą patį dalyką. Tačiau gali kilti netikėta problema. Pavyzdžiui, jei pakeisite žymės pavadinimą ir atnaujinsite kryžmines nuorodas, tai tikrai nepavyks ir baigsis nuorodų klaidomis, pvz., žemiau:

Priežastis ta, kad keisdami žymos pavadinimą netyčia ištrynėte pačią žymę. Dabar parodysime 2 būdus, kaip išspręsti šią problemą.

1 būdas: pakeiskite žymės pavadinimą ir atnaujinkite kryžmines nuorodas rankiniu būdu

1. Norėdami pradėti, spustelėkite skirtuką „Įterpti“, tada grupėje „Nuorodos“ spustelėkite „Žymės“.
2. Toliau spustelėkite, kad pasirinktumėte tikslinę žymę, ir spustelėkite „Eiti į“.
3. Pamatysite, kad žymių tekstai yra pasirinkti. Spustelėkite „Ištrinti“.
4. Tada įveskite naują žymės pavadinimą ir spustelėkite „Pridėti“.
5. Paspauskite „Alt + F9“, kad būtų rodomi lauko kodai.
6. Jei turite kelias kryžmines nuorodas, rekomenduojame naudoti funkciją „Rasti ir pakeisti“. Tiesiog paspauskite „Ctrl + H“, kad iškviestumėte dialogo langą „Rasti ir pakeisti“.
7. Dabar įveskite „REF DWORDR“ į „Rasti ką“ ir „REF DWORDR2“ į „Pakeisti į“. „DWORDR“ yra originalus žymės pavadinimas, o „DWORDR2“ yra naujas.
8. Tada spustelėkite „Pakeisti viską“.
9. Uždarykite langelį „Rasti ir pakeisti“ ir paspauskite „Alt + F9“, kad vėl būtų rodomas nuorodos turinys.
10. Tada paspauskite „Ctrl + A“ ir „F9“, kad atnaujintumėte visus dokumento laukus.

Kai perkeliate žymeklį ant kryžminės nuorodos, ekrano patarimo laukelyje galite pamatyti naują žymės pavadinimą.

2 būdas: pakeiskite žymės pavadinimą ir atnaujinkite kryžmines nuorodas naudodami VBA

1. Pirmiausia paspauskite „Alt + F11“, kad paleistumėte VBA redaktorių.
2. Eikite į „Įprastą“ projektą, kad įterptumėte naują modulį, pirmiausia spustelėdami skirtuką „Įterpti“.
3. Tada išskleidžiamajame meniu pasirinkite „Modulis“.
4. Dukart spustelėkite naujai sukurtą modulį, kad atidarytumėte redagavimo sritį dešinėje pusėje.
5. Toliau ten įklijuokite šią makrokomandą:

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. Spustelėkite „Vykdyti“ arba paspauskite „F5“.
7. Dabar pirmame pasirodžiusiame laukelyje įveskite originalų žymės pavadinimą ir spustelėkite „Gerai“.
8. Antrajame įveskite naują pavadinimą ir spustelėkite „Gerai“.

Galiausiai bus langelis, rodantis rezultatą.

Prižiūrėkite Word dokumentus

Išlaidos a sugadintas Word dokumentas neapsiriboja stulbinančiais verslo nuostoliais, bet ir priverčia žmones emociškai sutrikdyti. Todėl labai svarbu imtis prevencinių priemonių, kad būtų išvengta nelaimingųjų, tokių kaip dokumentų atsarginių kopijų kūrimas.

Autoriaus įvadas:

Vera Chen yra duomenų atkūrimo ekspertė DataNumen, Inc., kuri yra pasaulyje duomenų atkūrimo technologijų lyderė, įskaitant xlsx remontas bei pdf programinės įrangos gaminių taisymas. Norėdami gauti daugiau informacijos, apsilankykite WWW.datanumen.com