Outlook VBA ဖြင့် အီးမေးလ်လက်ခံသူစာရင်းမှ အဆက်အသွယ်အဖွဲ့တစ်ခုကို အမြန်ဖန်တီးနည်း

ယခုမျှဝေပါ-

တစ်ခါတစ်ရံတွင် လက်ခံသူအများအပြားနှင့်အတူ အီးမေးလ်တစ်စောင် ပေးပို့ခြင်း သို့မဟုတ် လက်ခံသည့်အခါ၊ ဤလက်ခံသူများအတွက် အဆက်အသွယ်အဖွဲ့တစ်ခု ဖန်တီးလိုပေမည်။ ဤဆောင်းပါးသည် Outlook VBA ဖြင့် ၎င်းကိုအောင်မြင်စေရန် အမြန်နည်းလမ်းကို မိတ်ဆက်ပေးပါမည်။

ကျွန်ုပ်တို့၏ယခင်ဆောင်းပါးတွင် "လက်ခံသူစာရင်းမှ အဆက်အသွယ်အဖွဲ့တစ်ခု ဖန်တီးနည်း”၊ အီးမေးလ်လက်ခံသူများအတွက် အဆက်အသွယ်အဖွဲ့ကို ဖန်တီးရန် ဘုံနည်းလမ်းတစ်ခုကို ကျွန်ုပ်တို့ လေ့လာထားပါသည်။ ၎င်းမှာ ပထမဦးစွာ အီးမေးလ်များမှ လက်ခံသူများကို ရွေးချယ်ပြီး ကူးယူကာ အဆက်အသွယ်အဖွဲ့ကို ကိုယ်တိုင်ဖန်တီးကာ “အဖွဲ့ဝင်များ ->” အကွက်တွင် လက်ခံသူများကို ကူးထည့်ရန်ဖြစ်သည်။ သိသာသည်၊ ဤဆိုလိုသည်မှာ အလွန်ခက်ခဲသည်။ ထို့ကြောင့်၊ ဤနေရာတွင် ကျွန်ုပ်တို့သည် အဆက်အသွယ်အဖွဲ့အသစ်တစ်ခုကို လျင်မြန်စွာရရှိရန် Outlook VBA ကိုအသုံးပြုမည့် အခြားချဉ်းကပ်နည်းတစ်ခုကို မိတ်ဆက်ပေးပါမည်။ ထပ်ခါတလဲလဲ ကော်ပီကူးထည့်စရာမလိုဘဲ ခလုတ်တစ်ခုကို နှိပ်ရုံပါပဲ။ အသေးစိတ်အဆင့်များနှင့် VBA ကုဒ်များရယူရန် ဆက်လက်ဖတ်ရှုပါ။

အီးမေးလ်လက်ခံသူစာရင်းမှ အဆက်အသွယ်အဖွဲ့တစ်ခုကို ဖန်တီးပါ။

  1. အစပြုရန်အတွက် Outlook ရှိ "Developer" tab သို့သွားသင့်သည်။
  2. ထို့နောက် ဤတက်ဘ်အောက်တွင် သင်သည် “Visual Basic” ခလုတ်ကို ရှာဖွေပြီး နှိပ်နိုင်သည်။
  3. အဲဒီနောက်မှာတော့ “Microsoft Visual Basic for Applications” ဝင်းဒိုးအသစ်တစ်ခု ပွင့်လာပါလိမ့်မယ်။ ယခု သင်သည် “Insert” > “Module” ကိုနှိပ်ခြင်းဖြင့် မော်ဂျူးအသစ်တစ်ခုကို ဖွင့်သင့်သည်။Module အသစ်တစ်ခုထည့်ပါ။
  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 Codes များကို Module အသစ်သို့ ကူးယူပါ။

  1. နောက်ပိုင်းတွင် သင်သည် လက်ရှိ “Visual Basic” ဝင်းဒိုးမှ ထွက်နိုင်ပြီး Quick Access Toolbar သို့ မက်ခရိုအသစ်ကို ထပ်ထည့်ရန် ဆက်လက်လုပ်ဆောင်ပါ။ Quick Access Toolbar ရှိ အောက်မြှားကို နှိပ်ပြီး ၎င်း၏ drop down list မှ “More Commands” ကို ရွေးချယ်ပါ။
  2. ထို့နောက်တွင်၊ သင်သည် "Outlook Options" ဝင်းဒိုးသို့ရောက်လိမ့်မည်။ ဤအချိန်တွင် သင်သည် အောက်ပါအဆင့်များကို လုပ်ဆောင်ရန် လိုအပ်သည်-
  • ပထမဦးစွာ "Choose commands from" ကို "Macros" သို့ သတ်မှတ်ပါ။
  • ထို့နောက် ယခင်ထည့်ထားသော macro ကို ရှာပြီး ထုတ်ပါ။
  • ထို့နောက် အလယ်ဗဟိုရှိ “Add” ခလုတ်ကို နှိပ်ပါ။
  • နောက်ဆုံးအနေနဲ့ "OK" ခလုတ်ကိုနှိပ်ပါ။Quick Access Toolbar တွင် Macro အသစ်ကို ထည့်ပါ။
  1. ၎င်းနောက်၊ သင်သည် သင်၏ Outlook mail pane သို့ ပြန်သွားပြီး စမ်းကြည့်နိုင်ပါသည်။
  • အစပိုင်းတွင် သင်သည် မည်သည့်မေးလ်ဖိုင်တွဲတွင်မဆို မေးလ်တစ်ခုပေါ်တွင် ရေးသွင်းနိုင်သည်။
  • ထို့နောက် အောက်ပါပုံကဲ့သို့ Quick Access Toolbar ရှိ ခလုတ်ကို နှိပ်ပါ။အီးမေးလ်တစ်ခုကို ရွေးချယ်ပြီး Quick Access Toolbar ရှိ ခလုတ်ကို နှိပ်ပါ။
  • ထို့နောက် အဆက်အသွယ်အသစ်အတွက် သင့်အား အမည်သတ်မှတ်ပေးရန် တောင်းဆိုသည့် မက်ဆေ့ဘောက်စ်တစ်ခုအား သင်ရရှိမည်ဖြစ်သည်။အဆက်အသွယ်အဖွဲ့အသစ်အတွက် အမည်တစ်ခုကို သတ်မှတ်ပါ။
  • နောက်မှ "OK" ခလုတ်ကိုနှိပ်ပါ။ ရွေးချယ်ထားသော အီးမေးလ်လက်ခံသူအားလုံးပါဝင်သည့် အဆက်အသွယ်အသစ်သည် တစ်ချိန်တည်းတွင် ပွင့်လာမည်ဖြစ်သည်။ ၎င်းကိုသိမ်းဆည်းရန် "Save & Close" ကိုနှိပ်နိုင်သည်။အဆက်အသွယ်အဖွဲ့ကို သိမ်းဆည်းပါ။

Outlook Data Protection တွင် မရှိမဖြစ်ဆောင်ထားရမည့်အရာများ

Outlook သည် အားနည်းချက်ရှိသောကြောင့်၊ ၎င်းတို့၏ Outlook ဒေတာကို ကာကွယ်ရန် လုံလောက်သော ကြိုတင်ကာကွယ်မှုများ ပြုလုပ်သင့်သည်။ ပထမဦးစွာ၊ သင်သည် ပုံမှန် Outlook ဒေတာကို အရန်ကူးထားသင့်သည်။ ထို့အပြင်၊ သင်သည် built-in ပြုပြင်ရေးကိရိယာ Scanpst.exe ကိုရှာဖွေပြီးမည်သို့လုပ်ဆောင်ရမည်ကိုသင်သိရန်လိုအပ်သည်။ နောက်ဆုံးလိုအပ်ချက်မှာ ကြယ်စင်ပြင်ပတစ်ခုဖြစ်သည်။ ပျက်စီးနေသော Outlook ဒေတာပြုပြင်ရေးကိရိယာ, ကဲ့သို့ DataNumen Outlook Repairbackup နှင့် Scanpst.exe နှစ်ခုလုံးပျက်သွားပါက၊

စာရေးသူနိဒါန်း:

Shirley Zhang သည် ဒေတာပြန်လည်ရယူရေးဆိုင်ရာ ကျွမ်းကျင်သူဖြစ်သည်။ DataNumen, Inc. အပါအဝင် ဒေတာပြန်လည်ရယူရေးနည်းပညာများတွင် ကမ္ဘာ့ခေါင်းဆောင်ဖြစ်သည်။ ပြုပြင် SQL Server mdf ဒေတာဘေ့စ်အမှား နှင့် outlook ပြုပြင်ရေး software ထုတ်ကုန်များ။ ပိုမိုသိရှိလိုပါကသွားရောက်ကြည့်ရှု www ။datanumen.com

ယခုမျှဝေပါ-

မှတ်ချက်များကိုပိတ်ထားကြသည်။