অনেক ব্যবহারকারী আশা করেন যে Outlook স্বয়ংক্রিয়ভাবে ইমেলগুলিতে বিভিন্ন প্রাপকের জন্য বিভিন্ন স্বাক্ষর নির্বাচন করতে পারে। সুতরাং, এই নিবন্ধটি VBA এর মাধ্যমে কীভাবে এটি উপলব্ধি করতে হয় তা শেখাবে।
ডিফল্টরূপে, আউটলুক আপনাকে নতুন ইমেল, উত্তর এবং ফরোয়ার্ডে স্বয়ংক্রিয়ভাবে বিভিন্ন স্বাক্ষর সন্নিবেশ করার অনুমতি দেয়। যাইহোক, অনেক লোক আশা করে যে Outlook স্বয়ংক্রিয়ভাবে বিভিন্ন প্রাপকদের জন্য বিভিন্ন স্বাক্ষর নির্বাচন করতে পারে। দুর্ভাগ্যবশত, আউটলুক এমন একটি সরাসরি বৈশিষ্ট্য প্রদান করে না। এইভাবে, আপনাকে অন্য উপায় খুঁজতে হবে, যেমন কোনো তৃতীয় পক্ষের অ্যাড-ইন বা VBA কোড। এখন, নিম্নলিখিতগুলিতে, আমরা আপনার কাছে VBA কোডের একটি অংশ উন্মোচন করব, যা আপনাকে এটিকে বাতাসের মতো উপলব্ধি করতে সহায়তা করতে পারে।
স্বয়ংক্রিয়ভাবে বিভিন্ন প্রাপকের জন্য বিভিন্ন স্বাক্ষর নির্বাচন করুন
- প্রথমে, আপনাকে আপনার আউটলুক প্রোগ্রামটি চালু করতে হবে।
- তারপরে আপনি স্বয়ংক্রিয়-সন্নিবেশ স্বাক্ষর বৈশিষ্ট্যটি আরও ভালভাবে নিষ্ক্রিয় করেছিলেন।
- প্রথমত, "ফাইল" মেনুতে যান এবং "বিকল্পগুলি" নির্বাচন করুন।
- "আউটলুক বিকল্প" উইন্ডোতে, "মেল" ট্যাবে স্যুইচ করুন।
- তারপর খুঁজুন এবং "স্বাক্ষর" বোতামে ক্লিক করুন।
- পপআপ ডায়ালগ বক্সে পরবর্তী, "নতুন বার্তা" এবং "উত্তর/ফরওয়ার্ড" উভয় ক্ষেত্রেই "(কোনটিই নয়)" সেট করুন।
- এর পরে, পরিবর্তনগুলি সংরক্ষণ করতে "ঠিক আছে" সিরিজে ক্লিক করুন।
- এর পরে, আপনি Outlook প্রধান উইন্ডোতে ফিরে যেতে পারেন এবং "Alt + F11" কী টিপুন।
- এরপর, "অ্যাপ্লিকেশনের জন্য মাইক্রোসফ্ট ভিজ্যুয়াল বেসিক" উইন্ডোতে, "ThisOutlookSession" প্রকল্পটি খুঁজুন এবং খুলুন।
- পরবর্তীকালে, এই প্রকল্পে নিম্নলিখিত ভিবিএ কোডটি অনুলিপি করুন এবং আটকান।
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-এ ম্যাক্রো ব্যবহার করতে চান, আপনার দূষিত ম্যাক্রোগুলির বিরুদ্ধে আপনার সতর্কতা বাড়াতে হবে। অন্যথায়, আপনার PST ডেটা ঝুঁকিতে রাখা হবে। যদি PST দুর্নীতিগ্রস্ত হয়, আপনি আপনার যথাসাধ্য চেষ্টা করবেন পিএসটি পুনরুদ্ধার করুন তথ্য এই ক্ষেত্রে, এটি একটি শক্তিশালী হাতিয়ার প্রয়োগ করার পরামর্শ দেওয়া হয়, যেমন DataNumen Outlook Repair.
লেখকের ভূমিকা:
শিরলে জাং একটি ডেটা রিকভারি বিশেষজ্ঞ DataNumen, ইনক। যা তথ্য পুনরুদ্ধারের প্রযুক্তিগুলির সহ বিশ্বের শীর্ষস্থানীয় বর্গফুট ঠিক করা এবং আউটলুক মেরামত সফ্টওয়্যার পণ্য। আরো তথ্যের জন্য, যান WWW.datanumen.com