วิธีค้นหาแบทช์และแทนที่ข้อความในอีเมล Outlook หลายรายการ

ตามค่าเริ่มต้น Outlook ไม่สนับสนุนให้คุณค้นหาและแทนที่ข้อความในอีเมลหลายฉบับพร้อมกัน ดังนั้นหากคุณต้องการทำคุณสามารถอ้างถึงบทความนี้ ที่นี่เราจะสอนวิธีการใช้รหัส VBA

ตัวอย่างเช่นคุณเสร็จสิ้นอีเมลหลายฉบับใน Outlook ก่อนที่คุณจะส่งออกไปคุณพบข้อผิดพลาดและต้องการแก้ไขข้อความบางส่วนในอีเมลเหล่านี้ โดยทั่วไปคุณต้องทำการ "ค้นหาและแทนที่" ในอีเมลแต่ละฉบับทีละฉบับ แต่มันก็ยุ่งยากเกินไป ดังนั้นที่นี่เราจะแสดงวิธีที่มีประสิทธิภาพมากขึ้นซึ่งจะช่วยให้คุณทำสำเร็จเป็นกลุ่มได้

ค้นหาแบทช์และแทนที่ข้อความในอีเมลหลายฉบับ

1. เริ่มต้นด้วยการเปิดโปรแกรม Outlook ของคุณ
2. จากนั้นเข้าถึงตัวแก้ไข VBA ผ่านปุ่ม“ Alt + F11”
3. ในหน้าต่างใหม่ให้ใส่รหัส VBA ด้านล่างลงในโมดูลหรือโครงการ

Sub FindReplaceInMultipleEmails()
    Dim strFind, strReplace As String
    Dim objInspectors As Outlook.Inspectors
    Dim objInspector As Outlook.Inspector
    Dim objMail As Outlook.MailItem
    Dim objMailDocument As Word.Document
 
    'Enter the specific text
    strFind = InputBox("Enter the text for find: (Case Sensitive)")
    strReplace = InputBox("Enter the text for replacement: (Case Sensitive)")
 
    If Trim(strFind) <> "" Then
       Set objInspectors = Outlook.Application.Inspectors
 
       For Each objInspector In objInspectors
           If objInspector.CurrentItem.Class = olMail Then
              If objInspector.EditorType = olEditorWord Then
                 Set objMail = objInspector.CurrentItem
                 Set objMailDocument = objMail.GetInspector.WordEditor
 
                 'Find & replace specific text
                 With objMailDocument.Content.Find
                      .ClearFormatting
                      .Text = strFind
                      .Replacement.ClearFormatting
                      .Replacement.Text = strReplace
                      .Forward = True
                      .Wrap = wdFindContinue
                      .Format = False
                      .MatchCase = True
                      .MatchWholeWord = False
                      .Execute Replace:=wdReplaceAll
                End With
                objMail.Save
             End If
         End If
      Next
 
      MsgBox "Completed!", vbInformation + vbOKOnly
    End If
End Sub

4. หลังจากนั้นให้เพิ่มมาโครนี้ลงในแถบเครื่องมือด่วนตาม“วิธีเรียกใช้รหัส VBA ใน Outlook ของคุณ"
5. จากนั้นคุณสามารถลองใช้มาโครนี้ได้ทันที

• เปิดอีเมลต้นทาง
• จากนั้นคลิกปุ่มมาโครในแถบเครื่องมือด่วน
• ถัดไปคุณต้องป้อนข้อความเฉพาะเพื่อค้นหาและแทนที่
• เมื่อคุณได้รับข้อความแจ้ง“ เสร็จสมบูรณ์” คุณสามารถตรวจสอบอีเมลต้นทางได้

กู้คืน Outlook จากข้อขัดข้องที่ไม่คาดคิด

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

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

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