Paano I-Batch ang Maghanap at Palitan ang Teksto sa Maramihang Outlook Email

Bilang default, hindi ka sinusuportahan ng Outlook na hanapin at palitan ang text sa maraming email nang sabay-sabay. Samakatuwid, kung nais mong gawin ito, maaari kang sumangguni sa artikulong ito. Dito ay ituturo namin sa iyo kung paano ito mapagtanto sa pamamagitan ng VBA code.

Halimbawa, natapos mo na ang ilang email sa Outlook. Bago mo ipadala ang mga ito, natuklasan mo ang ilang mga pagkakamali at gusto mong baguhin ang ilang mga text sa mga email na ito. Sa pangkalahatan, kailangan mong isagawa ang 'Hanapin at Palitan" sa bawat email nang paisa-isa. Gayunpaman, ito ay masyadong mahirap. Kaya dito, ipapakita namin sa iyo ang isang mas epektibong paraan, na magbibigay-daan sa iyong magawa ito nang maramihan.

Batch na Maghanap at Palitan ang Teksto sa Maramihang Mga Email

1. Upang magsimula, simulan ang iyong programa sa Outlook.
2. Pagkatapos, i-access ang VBA editor sa pamamagitan ng "Alt + F11" key.
3. Sa bagong window, ilagay ang VBA code sa ibaba sa isang module o proyekto.

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. Pagkatapos nito, idagdag ang macro na ito sa Quick Access Toolbar ayon sa “Paano Patakbuhin ang VBA Code sa Iyong Outlook".
5. Sa dakong huli, maaari mong subukan ang macro na ito ngayon.

• Buksan ang pinagmulang mga email.
• Pagkatapos, i-click ang pindutan ng macro sa Quick Access Toolbar.
• Susunod, kailangan mong ipasok ang mga partikular na teksto upang mahanap at palitan.
• Kapag nakuha mo ang "Nakumpleto" na prompt, maaari mong tingnan ang pinagmulan ng mga email.

Ibalik ang Outlook mula sa Mga Hindi Inaasahang Pag-crash

Maaaring mag-crash ang Outlook ngayon at pagkatapos kung pinangangasiwaan mo nang hindi wasto ang iyong Outlook. Higit pa rito, kadalasan, sa kaganapan ng matinding pag-crash sa Outlook, malamang na sira ang iyong Outlook file. Sa oras na iyon, kailangan mong subukan ang pagbawi ng data ng Outlook. Siyempre, magiging napakasimple kung mayroon kang napapanahon na backup ng data. Ngunit kung hindi, kakailanganin mong maglapat ng matibay at mapagkakatiwalaang panlabas na tool, tulad ng DataNumen Outlook Repair. Maaari ito ayusin ang PST mag file ng hindi pinagpapawisan.

Panimula ng May-akda:

Si Shirley Zhang ay isang dalubhasa sa pagbawi ng data sa DataNumen, Inc., na pinuno ng mundo sa mga teknolohiya sa pagbawi ng data, kasama ang pag-aayos ng mdf at pananaw sa pag-aayos ng mga produktong software. Para sa karagdagang impormasyon pagbisita www.datanumen. Sa