আপনি ইমেল প্রিন্ট করার জন্য একটি নির্দিষ্ট নন-ডিফল্ট প্রিন্টার ব্যবহার করার জন্য Outlook কনফিগার করতে পারবেন না। কিন্তু এই নিবন্ধে, আমরা আপনাকে Outlook VBA এর মাধ্যমে এটি অর্জন করার একটি পদ্ধতি দেখাব।
আপনার কম্পিউটারে অবশ্যই একটি প্রিন্টার ডিফল্ট হিসাবে সেট করা থাকতে হবে, যা এই কম্পিউটারের সমস্ত প্রোগ্রামে প্রয়োগ করা হবে৷ এই ক্ষেত্রে, আপনি যদি Outlook-এ একটি নন-ডিফল্ট প্রিন্টারের মাধ্যমে ইমেলগুলি প্রিন্ট করতে চান, আপনাকে প্রিন্ট করার সময় প্রতিবার প্রিন্টার পরিবর্তন করতে হবে। এটা বেশ ঝামেলার। অতএব, নিম্নলিখিতগুলিতে, আমরা আপনাকে প্রতিবার প্রিন্টার পরিবর্তন করার প্রয়োজন ছাড়াই ইমেলের জন্য একটি নির্দিষ্ট প্রিন্টার স্বয়ংক্রিয়ভাবে ব্যবহার করার একটি উপায় শেয়ার করব।
স্বয়ংক্রিয়ভাবে ইমেল প্রিন্ট করতে একটি নির্দিষ্ট প্রিন্টার ব্যবহার করুন
- একেবারে শুরুতেই আপনার আউটলুক অ্যাপ্লিকেশনটি চালু করুন।
- তারপরে, মূল আউটলুক উইন্ডোতে, "Alt + F11" কী বোতাম টিপুন।
- এরপরে, প্রদর্শিত “Microsoft Visual Basic for Applications” উইন্ডোতে, আপনাকে প্রথমে “Microsoft Word object Library” সক্রিয় করতে হবে। এটি করার জন্য আপনি 'Tools' > 'Reference'-এ ক্লিক করতে পারেন।
- তারপরে, আপনাকে একটি খালি মডিউল অ্যাক্সেস করতে হবে।
- পরবর্তীকালে, এই মডিউলটিতে নিম্নলিখিত ভিবিএ কোডটি অনুলিপি করুন এবং আটকান।
Sub PrintEmail()
Dim objItem As Object
Dim objMail As Outlook.MailItem
Dim objWordApp As Word.Application
Dim strTempFolder As String
Dim strMailDocument As String
Dim objMailDocument As Word.Document
Dim strPrinter As String
Select Case Application.ActiveWindow.Class
Case olInspector
Set objItem = ActiveInspector.CurrentItem
Case olExplorer
Set objItem = ActiveExplorer.Selection.Item(1)
End Select
If TypeOf objItem Is MailItem Then
Set objMail = objItem
Set objWordApp = CreateObject("Word.Application")
strTempFolder = CStr(Environ("USERPROFILE")) & "\AppData\Local\Temp"
strMailDocument = strTempFolder & "\" & Format(Now, "yyyymmddssnn") & ".doc"
objMail.SaveAs strMailDocument, olDoc
Set objMailDocument = objWordApp.Documents.Open(strMailDocument)
objWordApp.Visible = True
objMailDocument.Activate
strPrinter = objWordApp.ActivePrinter
'Change to the name of specific printer
objWordApp.ActivePrinter = "Specific Printer"
objWordApp.PrintOut Range:=wdPrintAllDocument, Item:=wdPrintDocumentContent
objWordApp.ActivePrinter = strPrinter
objMailDocument.Close False
objWordApp.Quit
Kill strMailDocument
End If
End Sub
- এর পরে, আপনি বর্তমান উইন্ডোটি বন্ধ করতে পারেন।
- তারপরে, "ফাইল" মেনুতে যান এবং "বিকল্পগুলি" ক্লিক করুন।
- "আউটলুক বিকল্প" উইন্ডোতে, "দ্রুত অ্যাক্সেস টুলবার" ট্যাবে স্থানান্তর করুন এবং যথারীতি দ্রুত অ্যাক্সেস টুলবারে নতুন ম্যাক্রো যোগ করুন।
- অবশেষে, আপনি এই VBA প্রকল্প চেষ্টা করতে পারেন.
- প্রথমত, আপনি প্রিন্ট করতে চান এমন একটি ইমেল নির্বাচন করুন বা খুলুন।
- তারপরে, কুইক অ্যাক্সেস সরঞ্জামদণ্ডে ম্যাক্রো বোতামটি ক্লিক করুন।
- ইমেল একবারে নির্দিষ্ট প্রিন্টার দ্বারা মুদ্রিত হবে।
- এখন থেকে, নির্দিষ্ট প্রিন্টার দ্বারা ইমেল প্রিন্ট করতে, আপনি শুধু এই ম্যাক্রো ব্যবহার করতে পারেন।
দুর্ঘটনা দুর্নীতির পরে আউটলুক পুনরুদ্ধার করুন
আপনার আউটলুক ডেটা যাতে হারিয়ে না যায়, তার জন্য আপনাকে যথেষ্ট প্রচেষ্টা করতে হবে। উদাহরণস্বরূপ, আপনার নিয়মিতভাবে PST ফাইলের ব্যাকআপ নেওয়া উচিত। অবশ্যই, একটি এক্সটার্নাল রিপেয়ার টুল ব্যবহার করার পরামর্শ দেওয়া হয়, যেমন DataNumen Outlook Repair। এটা হতে পারে পিএসটি ঠিক করুন ত্রুটিগুলি এবং আপনার জন্য সর্বাধিক আউটলুক ডেটা পুনরুদ্ধার করুন।
লেখকের ভূমিকা:
শিরলে জাং একটি ডেটা রিকভারি বিশেষজ্ঞ DataNumen, ইনক। যা তথ্য পুনরুদ্ধারের প্রযুক্তিগুলির সহ বিশ্বের শীর্ষস্থানীয় পুনরুদ্ধার এসকিএল এবং আউটলুক মেরামত সফ্টওয়্যার পণ্য। আরো তথ্যের জন্য, যান WWW.datanumen.com