আপনি যদি কোনও উইন্ডো ফোল্ডারে সমস্ত ফাইল ব্যক্তিগত আউটলুক ইমেলের মাধ্যমে কারও কাছে প্রেরণ করতে চান তবে আপনি এই নিবন্ধে প্রবর্তিত পদ্ধতিটি ব্যবহার করতে পারেন। এটি ভিবিএ কোড ব্যবহার করছে, যা বেশ কার্যকর।
আমার আগের নিবন্ধটি পড়ার পরে - "একটি স্থানীয় ফোল্ডারে সমস্ত ফাইল আউটলুক ইমেলের সাথে সংযুক্ত করার জন্য 3 দ্রুত পদ্ধতি", কিছু ব্যবহারকারী পৃথক ইমেলের মাধ্যমে স্থানীয় ফোল্ডারে সমস্ত ফাইল প্রেরণ করতে চান। স্ট্যান্ডার্ড ফ্যাশনে আপনার ইমেলগুলি তৈরি করা উচিত এবং ফাইলগুলি একে একে সংযুক্ত করা উচিত। এটা বেশ ঝামেলা। সুতরাং, নিম্নলিখিতগুলিতে, আমরা আপনাকে আরও কার্যকর উপায় প্রবর্তন করব।
ব্যাচ সমস্ত ফাইল পৃথক ইমেলগুলির মাধ্যমে একটি উইন্ডোজ ফোল্ডারে প্রেরণ করে
- প্রথমেই, আপনার Outlook প্রোগ্রামটি চালু করুন।
- তারপরে, আউটলুকে, নিবন্ধের উল্লেখে ভিবিএ সম্পাদক অ্যাক্সেস করুন - “আপনার আউটলুকে কীভাবে ভিবিএ কোড চালাবেন".
- এরপরে, নিম্নলিখিত ভিবিএ কোডটি একটি প্রকল্প বা মডিউলে কপি এবং পেস্ট করুন।
Sub SendAllFilesInSeparateEmails()
Dim objShell As Object
Dim objWindowsFolder As Object
Dim objFile As Object
Dim strWindowsFolder As String
Dim objFileSystem As Object
Dim objMail As Outlook.MailItem
'Select a Windows folder
Set objShell = CreateObject("Shell.Application")
Set objWindowsFolder = objShell.BrowseForFolder(0, "Select a Windows Folder:", 0, "")
If Not objWindowsFolder Is Nothing Then
strWindowsFolder = objWindowsFolder.self.Path & "\"
Set objFileSystem = CreateObject("Scripting.FileSystemObject")
Set objWindowsFolder = objFileSystem.GetFolder(strWindowsFolder)
'Send each file in an email
For Each objFile In objWindowsFolder.Files
'Create a new mail
Set objMail = Outlook.Application.CreateItem(olMailItem)
'Change the details as per your needs
With objMail
.Subject = Left(objFile.Name, Len(objFile.Name) - (Len(objFileSystem.GetExtensionName(objFile.Name)) + 1))
.Attachments.Add objFile.Path
.Recipients.Add ("someone@datanumen.com")
.Recipients.ResolveAll
.Send
End With
Next
'Prompt you when completing sending
MsgBox "All done!", vbOKOnly + vbExclamation
End If
End Sub
- এর পরে, আপনি একবারে এই ম্যাক্রো চালাতে পারেন। কেবল “F5” কী বোতাম টিপুন।
- পরবর্তী সময়ে, আপনাকে পপআপ ডায়ালগ বাক্সে উত্স উইন্ডোজ ফোল্ডারটি নির্বাচন করতে হবে।
- শেষ পর্যন্ত, আউটলুক এই উইন্ডোজ ফোল্ডারের সমস্ত ফাইল সংযুক্ত করে ইমেলগুলি পৃথক করে এবং পূর্বনির্ধারিত প্রাপকের কাছে মেলগুলি প্রেরণ করে।
- এটি শেষ হয়ে গেলে, আপনি একটি বার্তা পাবেন "সমস্ত সম্পন্ন!"!
আউটলুক স্বাস্থ্যের উপর নজর রাখুন
যদিও আউটলুককে বাজারের সবচেয়ে জনপ্রিয় ইমেল ক্লায়েন্ট হিসেবে প্রচার করা হয়েছে, তবুও এর একটি মারাত্মক ত্রুটি রয়েছে। আর তা হলো এর দুর্বলতা। অন্য কথায়, আউটলুক বিভিন্ন ধরনের ত্রুটি এবং ডেটা করাপশনের ঝুঁকিতে থাকে। তাই, আপনার আউটলুকের সুরক্ষার প্রতি আপনাকে বিশেষ গুরুত্ব দিতে হবে এবং এটিকে ক্ষতি থেকে রক্ষা করতে হবে। এছাড়াও, আপনাকে নিয়মিত বিরতিতে আপনার আউটলুক ফাইলগুলোর ব্যাকআপ নিতে হবে। পাশাপাশি, একটি PST ফিক্স টুল ব্যবহার করার পরামর্শ দেওয়া হয়, যেমন... DataNumen Outlook Repair। এটা হতে পারে মেরামত আউটলুক কোন ঝামেলা ছাড়াই ইস্যু।
লেখকের ভূমিকা:
শিরলে জাং একটি ডেটা রিকভারি বিশেষজ্ঞ DataNumen, ইনক। যা তথ্য পুনরুদ্ধারের প্রযুক্তিগুলির সহ বিশ্বের শীর্ষস্থানীয় বর্গফুট ঠিক করা এবং আউটলুক মেরামত সফ্টওয়্যার পণ্য। আরো তথ্যের জন্য, যান WWW.datanumen.com