Paano Mabilis na Lumikha ng isang Pangkat ng Pakikipag-ugnay mula sa Listahan ng Tatanggap ng isang Email na may Outlook VBA

Sa mga oras, kapag nagpadala ka o nakakatanggap ng isang email na may maraming mga tatanggap, baka gusto mong lumikha ng isang pangkat ng contact para sa mga tatanggap na ito. Ang artikulong ito ay magpapakilala ng isang mabilis na paraan upang magawa ito sa Outlook VBA.

Sa aming nakaraang artikulo "Paano Lumikha ng isang Pangkat ng Pakikipag-ugnay mula sa Listahan ng Tatanggap", Natutunan namin ang isang karaniwang pamamaraan upang likhain ang pangkat ng contact para sa mga tatanggap ng email. Iyon ay upang unang piliin at kopyahin ang mga tatanggap mula sa mga email, at pagkatapos ay lumikha ng isang pangkat ng contact nang manu-mano at i-paste ang mga tatanggap sa patlang na "Mga Miyembro ->". Malinaw na, nangangahulugan ito na labis na masalimuot. Samakatuwid, dito ay ipakikilala namin ang isa pang diskarte, na gagamitin ang Outlook VBA upang mabilis na makamit ang isang bagong pangkat sa pakikipag-ugnay. Maaari mo lamang pindutin ang isang pindutan nang hindi kailangan na paulit-ulit na kopyahin at i-paste. Basahin ang upang makuha ang mga detalyadong hakbang at VBA code.

Lumikha ng isang Pangkat ng Pakikipag-ugnay mula sa Listahan ng Tatanggap ng isang Email

1. Una sa lahat, pumunta sa tab na "Developer" sa Outlook.
2. Pagkatapos sa ilalim ng tab na ito, maaari mong hanapin at mag-click sa pindutang "Visual Basic".
3. Pagkatapos nito, isang bagong window na "Microsoft Visual Basic for Applications" ang magbubukas. Ngayon ay dapat mong buksan ang isang bagong module sa pamamagitan ng pag-click sa "Ipasok"> "Modyul".
4. Susunod sa bagong window ng module, maaari mong kopyahin at i-paste ang mga sumusunod na code dito.

Sub createcontactgroupforrecipients()
    Dim obApp As Application
    Dim olSel As Selection
    Dim obj As Object
    Dim oMail As MailItem
    Dim tempMail As MailItem
    Dim Recips As Recipients
    Dim ConGroup As DistListItem
    Dim strName As String
 
    Set obApp = Outlook.Application
    Set olSel = obApp.ActiveExplorer.Selection
 
    For Each obj In olSel
        If obj.Class = olMail Then
           Set oMail = obj
           Set tempMail = oMail.ReplyAll
           Set Recips = tempMail.Recipients
           Set ConGroup = obApp.CreateItem(olDistributionListItem)
           strName = InputBox("Specify a name for the new contact group:")
           With ConGroup
                .AddMembers Recips
                .DLName = strName
                'Use ".Save" to directly save the new contact group
                .Display
           End With
           tempMail.Close olDiscard
        End If
     Next
End Sub

5. Sa paglaon maaari kang lumabas sa kasalukuyang window na "Visual Basic" at magpatuloy upang idagdag ang bagong macro sa Quick Access Toolbar. Mag-click sa pababang arrow sa Quick Access Toolbar at piliin ang "Higit pang Mga Utos" mula sa drop down list nito.
6. Kasunod, makakakuha ka sa window ng "Mga Pagpipilian sa Outlook". Sa puntong ito, kailangan mong gawin ang mga sumusunod na hakbang:

• Una, itakda ang "Pumili ng mga utos mula sa" sa "Macros".
• Pagkatapos hanapin at ilabas ang dating naidagdag na macro.
• Susunod na pag-click sa pindutang "Idagdag" sa gitna.
• Panghuli pindutin ang "OK" na pindutan.

7. Pagkatapos nito, maaari kang bumalik sa iyong Outlook mail pane at subukan.

• Sa una, maaari kang mag-pitch sa isang mail sa anumang folder ng mail.
• Pagkatapos i-click ang pindutan sa Quick Access Toolbar, tulad ng imahe sa ibaba:
• At sa susunod makakatanggap ka ng isang kahon ng mensahe, na hinihiling sa iyo na tukuyin ang isang pangalan para sa bagong pangkat sa pakikipag-ugnay.
• Mamaya i-click ang pindutan na "OK". Kaagad, magbubukas ang bagong pangkat ng contact, na naglalaman ng lahat ng mga napiling tatanggap ng email. Maaari mong pindutin ang "I-save at Isara" upang mai-save ito.

Must-Haves sa Pangangalaga sa Data ng Outlook

Dahil sa katotohanang mahina ang Outlook, dapat kang gumawa ng sapat na pag-iingat upang mapangalagaan ang kanilang data sa Outlook. Una, dapat kang gumawa ng isang regular na backup ng data ng Outlook. Bilang karagdagan, kailangan mong malaman kung paano malaman at patakbuhin ang built-in na tool sa pag-aayos, Scanpst.exe. Ang huling ngunit hindi bababa sa kinakailangan ay isang stellar panlabas nasirang tool sa pag-aayos ng data ng Outlook, Gaya ng DataNumen Outlook Repair, na darating upang iligtas mo kung ang backup at Scanpst.exe ay parehong nabigo.

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 magkumpuni SQL Server error sa mdf database at pananaw sa pag-aayos ng mga produktong software. Para sa karagdagang impormasyon pagbisita www.datanumen. Sa