Үгсийн баримт бичигт хавчуургын нэрийг өөрчлөх 2 зөв арга

Одоо хуваалцах:

Дараах нийтлэлд бид танд Word баримт бичигт хавчуургын нэрийг өөрчлөх 2 зөв аргыг өгөхийг хүсч байна.

Урт урт Word баримт бичгийг боловсруулахдаа хавчуурга, хөндлөн ишлэлүүд нь ижил зүйлийг дахин тайлбарлахад маш их цаг хэмнэх замаар бидний хамгийн сайн найз болох боломжтой. Гэсэн хэдий ч гэнэтийн асуудал гарч болзошгүй юм. Жишээлбэл, хэрэв та хавчуургын нэрийг өөрчилж, хөндлөн ишлэлийг шинэчилбэл, та бүтэлгүйтэж, доор дурдсан гэх мэт лавлах алдаануудаар төгсөх болно.Лавлах алдаа

Үүний шалтгаан нь хавчуургын нэрийг өөрчлөх үед та хавчуургыг өөрөө санамсаргүйгээр устгасан явдал юм. Одоо бид энэ асуудлыг шийдвэрлэх 2 аргыг танд үзүүлэх болно.

Арга 1: Хавчуургын нэрийг өөрчлөх, хөндлөн ишлэлийг гараар шинэчлэх

  1. Start унтраах, "Insert" таб дээр дараад "Links" бүлгийн "Bookmark" дээр дарна уу."Оруулах" дээр дарна уу -> "Хавчуурга" дээр дарна уу
  2. Дараа нь товшино уу tarхавчуурга аваад "Go To" дээр дарна уу.
  3. Тэр үед хавчуургын текстүүд сонгогдох болно. "Устгах" дээр дарна уу.Bookmark-> "Go to" дээр дарж "Delete" дээр дарна уу.
  4. Дараа нь хавчуургын шинэ нэрийг оруулаад "Нэмэх" дээр дарна уу.
  5. Талбайн кодыг харуулахын тулд “Alt + F9” товчийг дарна уу.Талбайн кодыг харуулахын тулд "Alt + F9" товчийг дарна уу
  6. Хэрэв танд олон хөндлөн лавлагаа байгаа бол бид танд "Орлуулах, солих" функцийг ашиглахыг зөвлөж байна. “Find and Replace” харилцах цонхыг дуудахын тулд “Ctrl + H” товчийг дарахад л хангалттай.
  7. Одоо "Find what" текст хайрцагт "REF DWORDR", "Replace with" гэсэн хэсэгт "REF DWORDR2" гэж оруулна уу. “DWORDR” нь хавчуургын анхны нэр бөгөөд “DWORDR2” нь шинэ юм.
  8. Дараа нь "Бүгдийг солих" дээр дарна уу.Хавчуургын нэрийг оруулна уу -> "Бүгдийг солих" дээр дарна уу
  9. "Find and Replace" нүдийг хааж, "Alt + F9" товчийг дарж лавлах агуулгыг дахин харуулна уу.
  10. Дараа нь баримт бичгийн бүх талбарыг шинэчлэхийн тулд "Ctrl + A" ба "F9" товчийг дарна уу.

Та курсорыг хөндлөн лавлагаа дээгүүр шилжүүлэхдээ дэлгэцийн хайрцаг дээрх хавчуургын шинэ нэрийг харж болно.Үр нөлөө

Арга 2: Хавчуургын нэрийг өөрчилж, хөндлөн лавлагаа VBA-ээр шинэчлэх

  1. Нэгдүгээрт, VBA засварлагчийг ажиллуулахын тулд “Alt + F11” товчийг дарна уу.
  2. Эхлээд “Оруулах” таб дээр дарж шинэ модуль оруулахын тулд “Хэвийн” төсөл рүү орно уу.
  3. Дараа нь түүний цэснээс "Модуль" -г сонгоно уу."Normal" дээр дарна уу - "Insert" дээр дарна уу - "Module" дээр дарна уу
  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
  1. "Run" дээр дарна уу эсвэл "F5" дээр дарна уу.Кодуудыг буулгах -> "Ажиллуулах" дээр дарна уу
  2. Одоо гарч ирэх эхний хайрцагт хавчуургын анхны нэрийг оруулаад “OK” дээр дарна уу.Эх нэрийг оруулна уу-> "OK" дээр дарна уу
  3. Хоёрдахь хэсэгт шинэ нэрийг оруулаад "OK" дээр дарна уу.Шинэ хавчуургын нэр оруулна уу -> "OK" дээр дарна уу

Эцэст нь үр дүнг харуулсан хайрцаг байх болно.Үр дүнг харуулсан хайрцаг

Word Documents-ийг хар

Вost нь эвдэрсэн үг баримт бичиг нь бизнесийн томоохон алдагдлыг хязгаарлахаас гадна хүмүүсийг сэтгэл санааны хямралд оруулдаг. Тиймээс азгүй хүмүүсийг тойрч гарахын тулд урьдчилан сэргийлэх арга хэмжээ авах шаардлагатай байна.

Зохиогчийн танилцуулга:

Вера Чен бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. xlsx засвар болон pdf програм хангамжийн бүтээгдэхүүнийг засах. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com

Одоо хуваалцах:

Тайлбарууд нь хаалттай байна.