কিভাবে দ্রুত VBA এর মাধ্যমে আপনার স্থানীয় ড্রাইভে সমস্ত আউটলুক PST ফাইলগুলির একটি তালিকা পেতে হয়৷

আউটলুক সমাধান সেপ্টেম্বর 29, 2025
এখন শেয়ার:

আপনি যদি আপনার পিসির স্থানীয় ড্রাইভে সংরক্ষিত সমস্ত আউটলুক পিএসটি ফাইলের একটি তালিকা পাওয়ার আশা করেন তবে আপনি এই নিবন্ধে দেখানো VBA কোডের অংশটি ব্যবহার করতে পারেন। এটি আপনাকে দ্রুত সময়ের মধ্যে এটি পেতে অনুমতি দিতে পারে।

দ্রুত VBA এর মাধ্যমে আপনার স্থানীয় ড্রাইভে সমস্ত Outlook PST ফাইলের একটি তালিকা পান৷

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

আপনার স্থানীয় ড্রাইভে সমস্ত আউটলুক পিএসটি ফাইলগুলির একটি তালিকা পান৷

  1. প্রথমত, আপনার Outlook প্রোগ্রামটি চালু করুন।
  2. তারপর, আমার পূর্ববর্তী নিবন্ধের রেফারেন্স সহ আপনার Outlook VBA সম্পাদক অ্যাক্সেস করুন – “আপনার আউটলুকে কীভাবে ভিবিএ কোড চালাবেন".
  3. এরপরে, নিচের VBA কোডটি কপি করে “ThisOutlookSession” বা একটি অব্যবহৃত মডিউলে পেস্ট করুন।
Sub FindAllOutlookPSTFiles()
    Dim objWMIService As Object
    Dim objPSTFiles As Object
    Dim objPSTFile As Object
    Dim i As Long
    Dim objFileSystem As Object
    Dim objFolder As Object
    Dim strTextFile As String
    Dim objTextFile As Object
 
    'Find All PST Files on Drive C
    'You can change "C:" to the other drive letter as per your needs
    Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
    Set objPSTFiles = objWMIService.ExecQuery ("Select * from CIM_DataFile Where Extension = 'pst' AND Drive = 'C:'")
 
    If objPSTFiles.count > 0 Then
 
       'Create a text file
       Set objFileSystem = CreateObject("Scripting.FileSystemObject")
       strTextFile = "E:\PST_Files_on_Drive_C.txt"
       Set objTextFile = objFileSystem.CreateTextFile(strTextFile, True)
 
       i = 1
 
       For Each objPSTFile In objPSTFiles
           'Input the PST file name, size and path into the text file
           objTextFile.Write (i & ". " & objPSTFile.filename & "." & objPSTFile.Extension & vbCrLf & " Size: " & objPSTFile.FileSize / 1024 & "KB" & vbCrLf & " Path: " & objPSTFile.Drive & objPSTFile.Path & vbCrLf & vbCrLf)
           i = i + 1
       Next
 
       objTextFile.Close
 
       'Open this text file
       Shell "C:\Windows\Notepad.exe " & strTextFile, 1
    Else
       MsgBox "There isn't PST file on this drive!", vbExclamation + vbOKOnly
    End If
End Sub

VBA কোড - আপনার স্থানীয় ড্রাইভে সমস্ত আউটলুক PST ফাইলের একটি তালিকা পান

  1. এর পরে, আপনি এখনই এই ম্যাক্রো ব্যবহার করে দেখতে পারেন। শুধু "F5" কী বোতাম টিপুন।
  2. ম্যাক্রো সম্পূর্ণ হলে, আপনি একটি টেক্সট ফাইল প্রদর্শন করতে দেখতে পাবেন, যা নিচের স্ক্রিনশটের মতো দেখাবে:টেক্সট ফাইলে রপ্তানি করা তালিকা

আউটলুক ক্র্যাশের ক্ষেত্রে মেরামত টুল ব্যবহার করুন

আপনার আউটলুকে সময়ে সময়ে বিভিন্ন ত্রুটি ঘটতে পারে। আপনি যদি তাদের সময়মতো সমাধান না করেন, তাহলে অবশেষে একদিন আপনি গুরুতর আউটলুক ক্র্যাশের শিকার হবেন। তাই, আশেপাশে একটি শক্তিশালী এবং অভিজ্ঞ PST মেরামতের ইউটিলিটি রাখা ঠিক, যেমন DataNumen Outlook Repair। এটি বিশেষভাবে ডিজাইন করা হয়েছে মেরামত পিএসটি ফাইল এইভাবে এটি আপনাকে PST ডেটা ক্ষতি থেকে বাঁচাতে সক্ষম।

লেখকের ভূমিকা:

শিরলে জাং একটি ডেটা রিকভারি বিশেষজ্ঞ DataNumen, ইনক। যা তথ্য পুনরুদ্ধারের প্রযুক্তিগুলির সহ বিশ্বের শীর্ষস্থানীয় sql দুর্নীতি এবং আউটলুক মেরামত সফ্টওয়্যার পণ্য। আরো তথ্যের জন্য, যান WWW.datanumen.com

এখন শেয়ার:

মন্তব্যসমূহ বন্ধ করা হয়.