2 วิธีในการแบทช์เปลี่ยนที่อยู่ของไฮเปอร์ลิงก์หลายรายการในอีเมล Outlook ของคุณ

ด้วยเหตุผลบางประการคุณได้แทรกไฮเปอร์ลิงก์หลายรายการไปยังข้อความในอีเมล 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 Object Library” ตามบทความ “วิธีการเพิ่มการอ้างอิงไลบรารีอ็อบเจ็กต์ใน 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. หลังจากนั้นให้เพิ่มมาโครนี้ลงในแถบเครื่องมือด่วนของหน้าต่างข้อความโดยอ้างอิงถึง“วิธีเรียกใช้รหัส VBA ใน Outlook ของคุณ"
5. ในที่สุดให้ทำตามขั้นตอนด้านล่างเพื่อลองใช้งาน

• ในกล่องโต้ตอบป๊อปอัปให้ป้อนที่อยู่ไฮเปอร์ลิงก์เก่าและใหม่
• เมื่อมาโครเสร็จสิ้นคุณจะได้รับข้อความแจ้งจำนวนไฮเปอร์ลิงก์ที่มีการเปลี่ยนแปลงที่อยู่
• มีการเปลี่ยนแปลงที่อยู่ของไฮเปอร์ลิงก์หลายรายการเช่นภาพด้านล่าง

ปกป้องข้อมูล Outlook ที่มีค่าของคุณ

เนื่องจาก Outlook มีแนวโน้มที่จะเกิดข้อผิดพลาดและความเสียหายคุณจึงต้องใช้มาตรการป้องกันที่มีประสิทธิภาพเพื่อป้องกันไฟล์ Outlook ของคุณ ก่อนอื่นคุณต้องทำการสำรองข้อมูล PST เป็นประจำ นอกจากนี้คุณควรสร้างนิสัยที่ดีในการปิด Outlook ของคุณด้วยวิธีที่เหมาะสม สุดท้าย แต่ไม่ท้ายสุดคุณควรเตรียมยาที่มีศักยภาพดีกว่า แก้ไข Outlook ยูทิลิตี้เช่น DataNumen Outlook Repair.

บทนำผู้เขียน:

Shirley Zhang เป็นผู้เชี่ยวชาญด้านการกู้คืนข้อมูลใน DataNumen, Inc. ซึ่งเป็นผู้นำระดับโลกด้านเทคโนโลยีการกู้คืนข้อมูล ได้แก่ SQL Server การฟื้นตัว และผลิตภัณฑ์ซอฟต์แวร์ซ่อมแซมแนวโน้ม ดูข้อมูลเพิ่มเติมได้ที่ wwwdatanumenด้วย.