Outlook VBA-тай имэйлийн хүлээн авагчдын жагсаалтаас холбоо барих бүлгийг хэрхэн хурдан үүсгэх вэ

Одоо хуваалцах:

Заримдаа та олон хүлээн авагчтай имэйл илгээх эсвэл хүлээн авахдаа эдгээр хүлээн авагчдын холбоо барих бүлэг үүсгэхийг хүсч магадгүй юм. Энэ нийтлэл нь Outlook VBA-тэй хийх хурдан арга замыг танилцуулах болно.

Бидний өмнөх нийтлэлд “Хүлээн авагчдын жагсаалтаас хэрхэн холбоо барих бүлэг үүсгэх вэ", Бид имэйл хүлээн авагчдын холбоо барих бүлгийг үүсгэх нийтлэг аргыг сурч мэдсэн. Нэгдүгээрт, имэйлүүдээс хүлээн авагчдыг сонгоод хуулаад дараа нь гараар холбоо барих бүлэг үүсгээд хүлээн авагчдыг “Гишүүд ->” талбарт буулгах явдал юм. Мэдээжийн хэрэг, энэ нь маш төвөгтэй юм. Тиймээс энд бид шинэ холбоо барих бүлгийг хурдан бий болгохын тулд Outlook VBA-г ашиглах өөр нэг аргыг танилцуулах болно. Та дахин дахин хуулж буулгах шаардлагагүй товчийг дарахад л болно. Нарийвчилсан алхам, VBA кодыг авахын тулд уншина уу.

Имэйлийн хүлээн авагчдын жагсаалтаас холбоо барих бүлэг үүсгэх

  1. Эхлээд та Outlook дээрх "Хөгжүүлэгч" таб руу очих хэрэгтэй.
  2. Дараа нь энэ табын доор та "Visual Basic" товчийг олж, товшино уу.
  3. Үүний дараа шинэ "Microsoft Visual Basic for Applications" цонх нээгдэнэ. Одоо та "Оруулах"> "Модуль" дээр дарж шинэ модуль нээх хэрэгтэй.Шинэ модулийг оруулна уу
  4. Дараа нь шинэ модуль цонхонд та дараах кодыг хуулж байрлуулж болно.
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

VBA кодуудыг шинэ модуль руу хуулна уу

  1. Дараа нь та одоо байгаа "Visual Basic" цонхноос гарч, Quick Access Toolbar дээр шинэ макро нэмж оруулах боломжтой. Түргэн нэвтрэх хэрэгслийн самбар дээрх доош суман дээр дарж, доош унах жагсаалтаас "Илүү тушаал" -ыг сонгоно уу.
  2. Дараа нь та "Outlook Options" цонхонд орох болно. Энэ үед та дараах алхмуудыг хийх хэрэгтэй.
  • Нэгдүгээрт, "командыг сонгох" -ыг "Макро" болгож тохируулна уу.
  • Дараа нь өмнө нь нэмсэн макро хайж ол.
  • Дараа нь төвд байгаа "Нэмэх" товчийг дарна уу.
  • Эцэст нь “OK” товчийг дарна уу.Түргэн нэвтрэх хэрэгслийн самбарт шинэ макро нэмнэ үү
  1. Үүний дараа та Outlook мэйлийн хэсэг рүүгээ буцаж ороод үзээрэй.
  • Эхлээд та ямар ч шуудангийн хавтсанд нэг мэйл дээр давтаж болно.
  • Дараа нь доорх зураг шиг Quick Access Toolbar дээрх товчийг дарна уу:Имэйл сонгоод Quick Access Toolbar дээрх товчлуур дээр дарна уу
  • Дараа нь танд шинэ холбоо барих бүлгийн нэрийг зааж өгөхийг шаардсан мессеж хайрцаг ирнэ.Шинэ холбоо барих бүлгийн нэрийг оруулна уу
  • Дараа нь "OK" товчийг дарна уу. Бүх сонгосон имэйл хүлээн авагчдыг багтаасан шинэ холбоо барих бүлэг нэн даруй нээгдэнэ. Үүнийг хадгалахын тулд та "Хадгалах, хаах" товчийг дарж болно.Холбоо барих бүлгийг хадгалах

Outlook Data Protection-д заавал байх ёстой

Outlook нь эмзэг тул та тэдгээрийн Outlook өгөгдлийг хамгаалахын тулд хангалттай урьдчилан сэргийлэх арга хэмжээ авах хэрэгтэй. Нэгдүгээрт, та Outlook-ийн өгөгдлийг тогтмол нөөцлөх хэрэгтэй. Нэмж дурдахад та суулгагдсан засварын хэрэгсэл болох Scanpst.exe-ийг хэрхэн олж ажиллуулахаа мэдэх хэрэгтэй. Хамгийн сүүлчийн боловч хамгийн чухал хэрэгцээ бол оддын гадаад байдал юм гэмтсэн Outlook өгөгдлийг засах хэрэгсэлЗэрэг DataNumen Outlook Repair, нөөцлөлт болон Scanpst.exe хоёулаа бүтэлгүйтсэн тохиолдолд танд туслах болно.

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

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

Одоо хуваалцах:

Тайлбарууд нь хаалттай байна.