Word құжатындағы бетбелгі атауын өзгертудің дұрыс жолдары

Келесі мақалада біз сізге Word құжатындағы бетбелгі атауын өзгертудің 2 дұрыс әдісін ұсынғымыз келеді.

Ұзын 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. Біріншіден, VBA редакторын іске қосу үшін «Alt + F11» пернелерін басыңыз.
2. Алдымен «Кірістіру» қойындысын басу арқылы жаңа модульді енгізу үшін «Қалыпты» жобаға өтіңіз.
3. Содан кейін оның ашылмалы мәзірінен «Модуль» таңдаңыз.
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. Енді пайда болатын бірінші терезеге бетбелгінің түпнұсқасын енгізіп, «ОК» батырмасын басыңыз.
8. Екінші атауды енгізіп, «ОК» батырмасын басыңыз.

Соңында, нәтижені көрсететін қорап болады.

Word құжаттарына қарау

A бүлінген Word құжат бизнестің үлкен шығындарымен шектелмейді, сонымен қатар адамдарды эмоционалды күйзеліске ұшыратады. Осылайша, құжаттардың сақтық көшірмесін жасау сияқты сәтсіздерді айналып өту үшін алдын-алу шараларын қабылдау өте қажет.

Автордың кіріспесі:

Вера Чен - деректерді қалпына келтіру бойынша сарапшы DataNumen, Соның ішінде деректерді қалпына келтіру технологиялары бойынша әлемдік көшбасшы болып табылатын Inc. xlsx жөндеу және pdf бағдарламалық жасақтама өнімдерін жөндеу. Қосымша ақпарат алу үшін кіріңіз WWW.datanumen.com