হতে পারে আপনি আপনার আউটলুকে ইনবক্সের মতো একটি নির্দিষ্ট ফোল্ডারের অধীনে প্রচুর সংখ্যক সাবফোল্ডার তৈরি করেছেন। এই ক্ষেত্রে, আপনি যদি সাবফোল্ডারগুলি গণনা করতে চান তবে আপনাকে অবশ্যই ম্যানুয়ালি গণনা করতে অনিচ্ছুক হতে হবে। এখানে আমরা আপনাকে আরও স্মার্ট উপায় শেয়ার করব।

Outlook-এ আইটেমগুলিকে আরও ভালভাবে শ্রেণীবদ্ধ করতে এবং সংরক্ষণাগার করতে, অনেক ব্যবহারকারী বিভিন্ন ফোল্ডার এবং সাবফোল্ডার তৈরি করতে অভ্যস্ত। তবুও, পরে, তারা মনে করতে পারে যে অনেকগুলি ফোল্ডার পরিচালনা করা কিছুটা কঠিন। এই ক্ষেত্রে, তারা একটি নির্দিষ্ট ফোল্ডারের অধীনে কতগুলি সাবফোল্ডার রয়েছে তা গণনা করতে চাইতে পারে। কোনো সন্দেহ ছাড়াই, ম্যানুয়ালি গণনা করা বোকামি এবং ক্লান্তিকর। অতএব, নিম্নলিখিতগুলিতে, আমরা আরও অনেক বুদ্ধিমান উপায় দেখাব।
একটি নির্দিষ্ট ফোল্ডারের অধীনে সাবফোল্ডারের মোট সংখ্যা পান
- একেবারে শুরুতেই আপনার আউটলুক প্রোগ্রামটি চালু করুন।
- তারপর, Outlook উইন্ডোতে, আপনি VBA সম্পাদক অ্যাক্সেস করতে "Alt + F11" কী বোতাম টিপুন।
- এর পরে, পরবর্তী পপআপ উইন্ডোতে, আপনাকে একটি মডিউল খুলতে হবে যা ব্যবহার করা হচ্ছে না।
- পরবর্তীকালে, এই মডিউলটিতে নিম্নলিখিত ভিবিএ কোডটি অনুলিপি করুন এবং আটকান।
Sub CountSubfoldersUnderRootFolder()
Dim objRootFolder As Folder
Dim lFolderCount As Long
Dim objFolder As Object
'Get the current folder
Set objRootFolder = Outlook.Application.ActiveExplorer.CurrentFolder
'If you want to select, use the following line instead
'Set objRootFolder = Outlook.Application.Session.PickFolder
If objRootFolder.Folders.count > 0 Then
For Each objFolder In objRootFolder.Folders
'Exclude the hidden folders under Inbox
If objFolder.Name <> "Conversation Action Settings" And objFolder.Name <> "Quick Step Settings" Then
lFolderCount = lFolderCount + 1
'Process subfolders recursively
Call ProcessFolders(objFolder, lFolderCount)
End If
Next
MsgBox lFolderCount & " subfolders under " & Chr(34) & objRootFolder.Name & Chr(34) & ".", vbInformation
Else
MsgBox "No subfolders under " & Chr(34) & objRootFolder.Name & Chr(34) & ".", vbInformation
End If
End Sub
Sub ProcessFolders(objCurrentFolder As Object, lCount As Long)
Dim objSubfolder As Object
lCount = lCount + objCurrentFolder.Folders.count
For Each objSubfolder In objCurrentFolder.Folders
Call ProcessFolders(objSubfolder, lCount)
Next
End Sub
- এর পরে, আপনি বর্তমান উইন্ডোটি থেকে প্রস্থান করতে পারেন।
- পরে, “ফাইল” > “বিকল্পসমূহ” > “দ্রুত অ্যাক্সেস টুলবার”-এ যান। সেখানে আপনি দ্রুত অ্যাক্সেস টুলবারে নতুন ম্যাক্রো যোগ করতে পারেন।
- অবশেষে, আপনি এই ম্যাক্রো চেষ্টা করতে পারেন।
- প্রথমে, একটি ফোল্ডার নির্বাচন করুন যার সাবফোল্ডার আপনি গণনা করতে চান।
- তারপরে, কুইক অ্যাক্সেস সরঞ্জামদণ্ডে ম্যাক্রো বোতামটি ক্লিক করুন।
- অবিলম্বে, Outlook এই ম্যাক্রো চালাবে।
- ম্যাক্রো শেষ হওয়ার পরে, আপনি নিম্নলিখিত চিত্রের মতো একটি বার্তা পাবেন:
আউটলুক দুর্নীতির সাথে মোকাবিলা করার কৌশল
আউটলুক ভাইরাস, সফ্টওয়্যার বা হার্ডওয়্যার সমস্যা, পাওয়ার বিভ্রাট ইত্যাদি সহ অনেকগুলি কারণের জন্য ঝুঁকিপূর্ণ। কেউ গ্যারান্টি দিতে পারে না যে তারা তাদের আউটলুক ফাইলকে দুর্নীতি থেকে দূরে রাখতে সক্ষম। অতএব, ক্ষতির সাথে মোকাবিলা করার কিছু কৌশল আয়ত্ত করা অপরিহার্য। প্রথমত, আপনাকে নিয়মিত PST ব্যাকআপ করতে হবে। উপরন্তু, আপনি কিভাবে ব্যবহার করতে জানতে হবে স্ক্যানপস্ট, অন্তর্নির্মিত মেরামতের সরঞ্জাম। শেষ কিন্তু অন্তত নয়, আপনাকে আরও শক্তিশালী বাহ্যিক সরঞ্জাম প্রস্তুত করতে হবে, যেমন DataNumen Outlook repair.
লেখকের ভূমিকা:
শিরলে জাং একটি ডেটা রিকভারি বিশেষজ্ঞ DataNumen, ইনক। যা তথ্য পুনরুদ্ধারের প্রযুক্তিগুলির সহ বিশ্বের শীর্ষস্থানীয় এমডিএফ ঠিক করা এবং আউটলুক মেরামত সফ্টওয়্যার পণ্য। আরো তথ্যের জন্য, যান WWW.datanumen.com


