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

မတူညီသောလက်ခံသူအတွက် မတူညီသောလက်မှတ်များကို အလိုအလျောက်ရွေးချယ်ပါ။
- အစပိုင်းမှာတော့ Outlook ပရိုဂရမ်ကို စတင်အသုံးပြုရပါမယ်။
- ထို့နောက် အလိုအလျောက်ထည့်သွင်းသည့် လက်မှတ်အင်္ဂါရပ်ကို ပိုမိုကောင်းမွန်စွာ ပိတ်နိုင်ခဲ့သည်။
- ပထမဦးစွာ "File" မီနူးကိုသွားပြီး "Options" ကိုရွေးချယ်ပါ။
- “Outlook Options” ဝင်းဒိုးတွင်၊ “Mail” တက်ဘ်သို့ ပြောင်းပါ။
- ထို့နောက် “Signatures” ခလုတ်ကို ရှာပြီး နှိပ်ပါ။
- နောက်တစ်ခု ပေါ်လာသော ဒိုင်ယာလော့ဘောက်စ်တွင်၊ “မက်ဆေ့ဂျ်အသစ်များ” နှင့် “ပြန်ကြားချက်များ/ရှေ့ဆက်ခြင်း” နှစ်ခုစလုံးတွင် “(မရှိပါ)” ဟု သတ်မှတ်ပါ။
- ထို့နောက် ပြောင်းလဲမှုများကို သိမ်းဆည်းရန် “OK” စီးရီးတစ်ခုကို နှိပ်ပါ။
- ထို့နောက်၊ သင်သည် Outlook ပင်မဝင်းဒိုးသို့ ပြန်သွားပြီး “Alt + F11” ခလုတ်များကို နှိပ်နိုင်သည်။
- ထို့နောက်၊ “Microsoft Visual Basic for Applications” ဝင်းဒိုးတွင်၊ “ThisOutlookSession” ပရောဂျက်ကို ရှာပြီးဖွင့်ပါ။
- ထို့နောက် ဤပရောဂျက်ထဲသို့ အောက်ပါ VBA ကုဒ်ကို ကူးယူပြီး ကူးထည့်ပါ။
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim objMail As Outlook.MailItem
Dim objRecipients As Outlook.Recipients
Dim objRecipient As Outlook.recipient
Dim strRecipientAddress As String
Dim strSignatureFile As String
Dim objFileSystem As Object
Dim objTextStream As Object
Dim strSignature As String
If TypeOf Item Is MailItem Then
Set objMail = Item
Set objRecipients = objMail.Recipients
End If
'Select different signature files based on recipients
'You can change the conditions as per you actual needs
If objRecipients.Count = 1 Then
Set objRecipient = objRecipients.Item(1)
strRecipientAddress = objRecipient.Address
If strRecipientAddress = "mandy@datanumen.com" Then
strSignatureFile = CStr(Environ("USERPROFILE")) & "\AppData\Roaming\Microsoft\Signatures\Test John Smith.htm"
ElseIf strRecipientAddress = "anne@datanumen.com" Or strRecipientAddress = "tony@datanumen.com" Then
strSignatureFile = CStr(Environ("USERPROFILE")) & "\AppData\Roaming\Microsoft\Signatures\Johnny.htm"
ElseIf strRecipientAddress = "abby@datanumen.com" Then
strSignatureFile = CStr(Environ("USERPROFILE")) & "\AppData\Roaming\Microsoft\Signatures\New John Smith.htm"
End If
Else
strSignatureFile = CStr(Environ("USERPROFILE")) & "\AppData\Roaming\Microsoft\Signatures\John Smith.htm"
End If
'Read the specific signature file
Set objFileSystem = CreateObject("Scripting.FileSystemObject")
Set objTextStream = objFileSystem.OpenTextFile(strSignatureFile)
strSignature = objTextStream.ReadAll
'Insert the signature to this email
objMail.HTMLBody = objMail.HTMLBody & "<HTML><BODY><br>" & strSignature & "</br></HTML></BODY>"
End Sub
- အဲဒီနောက်မှာ ဒီကုဒ်ကို လက်မှတ်ထိုးရမယ်။
- လက်မှတ်ထိုးထားသော မက်ခရိုများကို ခွင့်ပြုရန် နောက်ပိုင်းတွင် သင်၏ Outlook မက်ခရိုဆက်တင်များကို ပြောင်းလဲပါ။
- ယခုမှစ၍ အီးမေးလ်တစ်စောင်ပေးပို့ရန် "Send" ခလုတ်ကိုနှိပ်လိုက်တိုင်း၊ Outlook သည် လက်ခံသူအား ခွဲခြားသတ်မှတ်ပြီး အီးမေးလ်စာကိုယ်အဆုံးတွင် သက်ဆိုင်ရာ လက်မှတ်ကို အလိုအလျောက် ထည့်သွင်းပေးမည်ဖြစ်သည်။
အဝင်အီးမေးလ်များတွင် ဝှက်ထားသော အန္တရာယ်ရှိသော Macros ကို ရှာဖွေပါ။
ယနေ့ခေတ်တွင် ဗိုင်းရပ်စ်များသည် အလွန်ရင့်ကျက်ပြီး အစွမ်းထက်လာသည်။ အီးမေးလ်ထဲတွင် ၎င်းတို့ကို အပြစ်ကင်းသော အရာများအဖြစ် အမြဲလိုလို ဖုံးကွယ်ထားကြသည်။ ထို့ကြောင့်၊ ယခု Outlook တွင် မက်ခရိုများကို အသုံးပြုရန် ရည်ရွယ်ထားသောကြောင့် အန္တရာယ်ရှိသော မက်ခရိုများကို ဆန့်ကျင်ရန် သင့်အနေဖြင့် သတိထားသင့်သည်။ မဟုတ်ပါက သင်၏ PST ဒေတာကို စွန့်စားရလိမ့်မည်။ PST သည် အကျင့်ပျက်ခြစားပါက အစွမ်းကုန်ကြိုးစားပါမည်။ PST ပြန်လည်ရယူပါ။ ဒေတာ။ ဤကိစ္စတွင်၊ ကဲ့သို့သောအစွမ်းထက်သောကိရိယာကိုအသုံးပြုရန်အကြံပြုထားသည်။ DataNumen Outlook Repair.
စာရေးသူနိဒါန်း:
Shirley Zhang သည် ဒေတာပြန်လည်ရယူရေးဆိုင်ရာ ကျွမ်းကျင်သူဖြစ်သည်။ DataNumen, Inc. အပါအဝင် ဒေတာပြန်လည်ရယူရေးနည်းပညာများတွင် ကမ္ဘာ့ခေါင်းဆောင်ဖြစ်သည်။ sql fix နှင့် outlook ပြုပြင်ရေး software ထုတ်ကုန်များ။ ပိုမိုသိရှိလိုပါကသွားရောက်ကြည့်ရှု www ။datanumen.com

