আপনি যদি আপনার আউটলুকে বেশ কয়েকটি ইমেইল অ্যাকাউন্ট কনফিগার করেন এবং প্রতিটি অ্যাকাউন্ট একটি পৃথক আউটলুক ডেটা ফাইল ব্যবহার করে, আপনার কাছে বেশ কিছু "মুছে ফেলা আইটেম" ফোল্ডার থাকবে। যখন আপনি প্রতিটি ইমেল অ্যাকাউন্টে প্রতিটি "মুছে ফেলা আইটেম" ফোল্ডার খালি করতে চান, আপনি এই নিবন্ধে VBA কোডের টুকরোটি ব্যবহার করতে পারেন। এটি আপনাকে প্রচুর পরিমাণে খালি করার অনুমতি দেয়।
আমরা সবাই জানি, আউটলুক ব্যবহারকারীদের বিভিন্ন ইমেইল অ্যাকাউন্ট যোগ এবং কনফিগার করার অনুমতি দেয়। এছাড়াও, যদি প্রতিটি অ্যাকাউন্ট একটি পৃথক আউটলুক ডেটা ফাইল ব্যবহার করে, প্রতিটি ফাইল একটি "মুছে ফেলা আইটেম" ফোল্ডার নিয়ে আসবে, যা আইটেমগুলি সংরক্ষণ করা হচ্ছে মুছে ফেলা হয়েছে। যখন আপনি নিশ্চিত করেন যে সমস্ত "মুছে ফেলা আইটেম" ফোল্ডারের আইটেমগুলি অকেজো, তখন আপনি ফোল্ডারগুলি খালি করার প্রবণতা পাবেন। এই ক্ষেত্রে, যদি আপনি তাদের ম্যানুয়ালি খালি করেন, এটি খুব ক্লান্তিকর হতে পারে। আপনি নীচের মত ব্যাচ খালি করার জন্য একটি টিপ প্রয়োগ করা ভাল।
ব্যাচ সমস্ত ইমেল অ্যাকাউন্টে সমস্ত "মুছে ফেলা আইটেম" ফোল্ডার খালি করে
- একেবারে গোড়ার দিকে আপনার আউটলুক প্রোগ্রামটি চালু করুন।
- তারপরে মূল আউটলুক উইন্ডোতে "Alt + F11" কী বোতাম টিপুন।
- "অ্যাপ্লিকেশনগুলির জন্য মাইক্রোসফ্ট ভিজ্যুয়াল বেসিক" উইন্ডোতে, আপনাকে একটি ফাঁকা মডিউল খুলতে হবে।
- পরবর্তীকালে, এই মডিউলটিতে নিম্নলিখিত ভিবিএ কোডগুলি অনুলিপি করুন এবং আটকান।
Sub BatchEmptyAllDeletedItemsFolder()
Dim objStores As Outlook.Stores
Dim objStore As Outlook.Store
Dim objPSTFile As Outlook.Folder
Dim objFolders As Outlook.folders
Dim objFolder As Object
Set objStores = Outlook.Application.Session.Stores
'Process all Outlook PST files in your Outlook
For Each objStore In objStores
Set objPSTFile = objStore.GetRootFolder
For Each objFolder In objPSTFile.folders
Call ProcessFolders(objFolder)
Next
Next
End Sub
Sub ProcessFolders(ByVal objCurrentFolder As Outlook.Folder)
Dim i, n As Long
If objCurrentFolder.Name = "Deleted Items" Then
'Delete all the items in "Deleted Items" folder
For i = objCurrentFolder.Items.Count To 1 Step -1
objCurrentFolder.Items.Item(i).Delete
'Delete all the subfolders under "Deleted Items" folder
For n = objCurrentFolder.folders.Count To 1 Step -1
objCurrentFolder.folders.Item(n).Delete
Next
Next
End If
End Sub
- এর পরে, আপনার Outlook ম্যাক্রো সেটিংস পরীক্ষা করা উচিত, নিশ্চিত করুন যে আপনার Outlook এ ম্যাক্রো অনুমোদিত।
- অবশেষে, আপনি মডিউলে ফিরে যেতে পারেন এবং এই ম্যাক্রো চালানোর জন্য "F5" কী বোতাম টিপুন।
- ম্যাক্রো চলার পরে, আপনি দেখতে পারেন যে সমস্ত "মুছে ফেলা আইটেম" ফোল্ডারগুলি সফলভাবে খালি করা হয়েছে।
আউটলুক দুর্নীতির ঘটনায়
আপনি কি কখনো আউটলুক ক্র্যাশ বা এমনকি আউটলুক দুর্নীতির সম্মুখীন হয়েছেন? সাধারণভাবে, আপনি কীভাবে ভয়ঙ্কর মামলাগুলি মোকাবেলা করবেন? আপনি যদি কয়েক দশক ধরে আউটলুক ব্যবহার করে থাকেন, তাহলে আপনার আউটলুকের বিভিন্ন সমস্যার মুখোমুখি হওয়া অনিবার্য। অতএব, আপনার মনের মধ্যে কিছু মেরামত এবং পুনরুদ্ধারের উপায় রাখা ভাল ছিল, যেমন ইনবক্স মেরামতের সরঞ্জাম ব্যবহার করা, নিয়মিত আউটলুক ডেটা ব্যাক আপ করা, শক্তভাবে ধরে রাখা আউটলুক ঠিক করা এই সমস্ত সতর্কতার সাথে, এমনকি যখন আপনার পিএসটি ফাইল আপোস হয়ে যায়, তখনও আপনি শান্ত থাকতে পারেন এবং সহজেই আপনার আউটলুক ডেটা খুঁজে পেতে পারেন।
লেখকের ভূমিকা:
শিরলে জাং একটি ডেটা রিকভারি বিশেষজ্ঞ DataNumen, ইনক। যা তথ্য পুনরুদ্ধারের প্রযুক্তিগুলির সহ বিশ্বের শীর্ষস্থানীয় sql ঠিক করুন এবং আউটলুক মেরামত সফ্টওয়্যার পণ্য। আরো তথ্যের জন্য, যান WWW.datanumen.com