Таны Outlook имэйл дэх олон гипер холбоосын хаягийг багцаар өөрчлөх 2 арга

Зарим шалтгааны улмаас та Outlook имэйлдээ текст рүү олон холбоос оруулсан байна. Мөн тэдний зарим нь нэг хаягтай холбоотой байдаг. Хэрэв та эдгээр холбоосын хаягийг багцлан өөрчлөхийг хүсвэл энэ нийтлэлд танилцуулсан аргуудыг ашиглаж болно.

Жишээлбэл, та мессежийн хэсэгт маш олон холбоос бүхий Outlook имэйл бичсэн байна. Гэсэн хэдий ч дараа нь та хаяг буруу байгааг олж мэдсэн. Мөн олон гипер холбоосууд энэ хаягийг ашиглаж байна. Тиймээс та эдгээр холбоосуудын хаягийг багцлан өөрчлөх хэрэгтэй. Энэ асуудлын хариуд бид дараа нь 2 хялбар бөгөөд хурдан аргыг хуваалцах болно.

Арга 1: Гараар олж солих

1. Эхлэхийн тулд нээсэн имэйлийн "Alt + F9" товчийг дарна уу.
2. Дараа нь бүх гипер холбоосын хаягууд шууд харагдах болно.
3. Одоо "Ctrl + H" товчийг дарж "Олох ба солих" харилцах цонх гарч ирнэ.
4. Энэ шинэ харилцах цонхны "Юуг олох" талбарт хуучин холбоосын хаягийг, "Орлуулах" талбарт шинэ хаягийг оруулна уу.
5. Үүний дараа "Бүгдийг солих" товчийг дарна уу.
6. Дараа нь "Олох ба солих" харилцах цонхыг хаа.
7. Мессежийн үндсэн хэсэгт буцаж ирсний дараа "Alt + F9" товчийг дахин дарж гипер холбоосын хаягийг нууна.
8. Дараа нь "Ctrl + A" товчийг дарж бүх мессежийн хэсгийг сонгоно уу.
9. Эцэст нь "F9" товчийг дарж бүх өөрчлөгдсөн холбоосын хаягийг шинэчилнэ үү.
10. Одоо курсорыг текстийн дээр байрлуулж, гипер холбоосын хаягуудыг шалгана уу. Дараах дэлгэцийн агшин шиг хуучин хаягуудтай холбоотой бүх гипер холбоосууд өөрчлөгдсөн.

Арга 2: Outlook VBA ашиглах

1. Эхний ээлжинд "Alt + F11" товчийг дарж VBA засварлагчийг ажиллуулна уу.
2. Дараа нь шинэ цонхонд "" нийтлэлийн дагуу "MS Word объектын сан"-г идэвхжүүлнэ үү.VBA дээр объектын номын сангийн лавлагааг хэрхэн нэмэх вэ".
3. Дараа нь дараахь VBA кодыг модульд оруулна уу.

Sub BatchChangeMultipleHyperlinkAddresses()
    Dim objMail As Outlook.MailItem
    Dim objMailDocument As Word.Document
    Dim objHyperlink As Word.Hyperlink
    Dim strOldAddress, strNewAddress As String
    Dim i As Long
 
    Set objMail = Application.ActiveInspector.CurrentItem
    Set objMailDocument = objMail.GetInspector.WordEditor
 
    If objMailDocument.Hyperlinks.Count > 0 Then
       'Enter the old and new hyperlink address
       strOldAddress = InputBox("Enter the old hyperlink address:")
       strNewAddress = InputBox("Enter the new hyperlink address:")
  
       'Change hyperlink address
       i = 0
       For Each objHyperlink In objMailDocument.Hyperlinks
           If InStr(objHyperlink.Address, strOldAddress) > 0 Then
              objHyperlink.Address = Replace(objHyperlink.Address, strOldAddress, strNewAddress)
              i = i + 1
           End If
       Next
 
       'Prompt you
       MsgBox i & " hyperlinks' addresses are changed!", vbInformation + vbOKOnly
    End If
End Sub

4. Дараа нь энэ макрог мессежийн цонхны Түргэн нэвтрэх хэрэгслийн мөрөнд нэмж "Таны Outlook дээр VBA кодыг хэрхэн ажиллуулах вэ".
5. Эцэст нь туршаад үзэхийн тулд доорх алхмуудыг дагана уу.

• Гарч ирэх харилцах цонхонд хуучин болон шинэ холбоосын хаягийг оруулна уу.
• Макро дууссаны дараа та хаягийг нь өөрчилсөн холбоосын тоог хэлэх мессеж хүлээн авах болно.
• Доорх зураг шиг олон холбоосын хаягийг өөрчилсөн.

Өөрийн үнэ цэнэтэй Outlook өгөгдлөө хамгаалаарай

Outlook нь алдаа, эвдрэлд өртөмтгий байдаг тул та Outlook файлаа хамгаалахын тулд хэд хэдэн үр дүнтэй урьдчилан сэргийлэх арга хэмжээ авах хэрэгтэй. Юуны өмнө та PST мэдээллийн нөөцлөлтийг тогтмол хийх хэрэгтэй. Мөн та хэтийн төлөвөө зөв хаах сайн зуршлыг бий болгох хэрэгтэй. Эцэст нь хэлэхэд та хүчирхэг бодис бэлтгэх нь дээр Outlook засах гэх мэт хэрэгсэл DataNumen Outlook Repair.

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

Ширли Жан бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. SQL Server нөхөн сэргээх програм хангамжийн бүтээгдэхүүнийг засах хэтийн төлөв. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com