2 ispravna načina za promjenu naziva knjižne oznake u vašem Word dokumentu

Podijeli sada:

U sljedećem članku želimo vam pružiti 2 ispravna načina za promjenu naziva knjižne oznake u vašem Word dokumentu.

Dok sastavljamo dugačak Wordov dokument, knjižne oznake i unakrsne reference mogu postati naš najbolji prijatelj jer nam štede puno vremena za ponovno objašnjavanje iste točke. Međutim, može doći do neočekivanog problema. Na primjer, ako promijenite naziv knjižne oznake i ažurirate unakrsne reference, sigurno nećete uspjeti i završiti s referentnim pogreškama kao što je dolje:Referentna pogreška

Razlog je taj što ste prilikom mijenjanja naziva oznake slučajno izbrisali samu oznaku. Sada ćemo vam pokazati 2 metode za rješavanje ovog problema.

Metoda 1: Promijenite naziv oznake i ručno ažurirajte unakrsne reference

  1. Za početak kliknite karticu "Umetni", a zatim u grupi "Veze" kliknite "Označi".Kliknite "Umetni"->Kliknite "Oznaka"
  2. Zatim kliknite za odabir ciljne oznake i kliknite "Idi na".
  3. Vidjet ćete da su tekstovi oznaka u izboru do tada. Pritisnite "Izbriši".Odaberite Oznaku->Kliknite "Idi na"->Kliknite "Izbriši"
  4. Zatim unesite novi naziv oznake i kliknite "Dodaj".
  5. Pritisnite “Alt+ F9” za prikaz kodova polja.Pritisnite "Alt+ F9" za prikaz kodova polja
  6. U slučaju da imate više unakrsnih referenci, preporučujemo da koristite funkciju "Pronađi i zamijeni". Samo pritisnite “Ctrl+ H” za pozivanje dijaloškog okvira “Pronađi i zamijeni”.
  7. Sada unesite “REF DWORDR” u tekstualni okvir “Pronađi što” i “REF DWORDR2” u okvir “Zamijeni sa”. "DWORDR" je originalni naziv oznake, a "DWORDR2" je novi.
  8. Zatim kliknite "Zamijeni sve".Unesite nazive oznaka -> Kliknite "Zamijeni sve"
  9. Zatvorite okvir "Pronađi i zamijeni" i pritisnite "Alt+ F9" za ponovno prikazivanje sadržaja reference.
  10. Zatim pritisnite “Ctrl+ A” i “F9” pored za ažuriranje svih polja u dokumentu.

Kada pomaknete kursor preko unakrsne reference, možete vidjeti novi naziv knjižne oznake u okviru za savjete na zaslonu.Učinak

Metoda 2: Promjena naziva knjižne oznake i ažuriranje unakrsnih referenci putem VBA

  1. Najprije pritisnite “Alt+ F11” da pokrenete VBA editor.
  2. Idite na projekt "Normal" da biste umetnuli novi modul tako da prvo kliknete karticu "Insert".
  3. Zatim odaberite "Modul" na padajućem izborniku.Kliknite "Normalno"->Kliknite "Umetni"->Kliknite "Modul"
  4. Dvaput kliknite na novostvoreni modul kako biste otvorili prostor za uređivanje s desne strane.
  5. Zatim tamo zalijepite sljedeću makronaredbu:
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
  1. Pritisnite “Run” ili pritisnite “F5”.Zalijepite kodove->Kliknite "Pokreni"
  2. Sada unesite izvorni naziv knjižne oznake u prvi okvir koji se pojavi i kliknite "U redu".Unesite originalni naziv->Kliknite "OK"
  3. Unesite novi naziv na drugi i kliknite "OK".Unesite naziv nove oznake->Kliknite "U redu"

Na kraju, prikazat će se okvir s rezultatom.Okvir koji prikazuje rezultat

Vodite računa o Word dokumentima

Trošak a pokvarena Riječ dokument nije ograničen na nevjerojatne poslovne gubitke, već također čini ljude emocionalno izbezumljenima. Stoga je iznimno potrebno poduzeti preventivne mjere kako bi se zaobišli nesretnici, kao što je sigurnosno kopiranje dokumenata.

Uvod za autora:

Vera Chen stručnjakinja je za oporavak podataka u DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući xlsx popravak i pdf popraviti softverske proizvode. Za više informacija posjetite www.datanumen.com

Podijeli sada:

Komentari su zatvoreni.