যদি আপনি ফোল্ডার কাঠামোটিকে একটি আউটলুক পিএসটি ফাইল থেকে অন্যটিতে অনুলিপি করতে চান তবে আপনি এই নিবন্ধে প্রবর্তিত পদ্ধতিটি ব্যবহার করতে পারেন, যা আপনাকে একবারে কীভাবে ভিবিএ ব্যবহার করতে হবে তা শিখিয়ে দেবে।
সম্ভবত, আপনার ইমেলগুলি আরও ভালভাবে পরিচালনা করার জন্য, আপনি আপনার মূল আউটলুক ফাইলে বেশ কয়েকটি কাস্টম ফোল্ডার তৈরি করেছেন। সুতরাং একটি নতুন আউটলুক পিএসটি ফাইল তৈরি করার সময়, আপনি একই ফোল্ডার কাঠামো প্রয়োগ করতে চাইতে পারেন। আসলে, আমার আগের লেখায় - "নতুন আউটলুক ফাইলে বর্তমান ফোল্ডার কাঠামো বজায় রাখার ২টি ধাপ", আপনি একটি traditionalতিহ্যগত পদ্ধতি শিখতে পারেন যা এটি অর্জনের জন্য" সংরক্ষণাগার "বৈশিষ্ট্যটি ব্যবহার করছে। তা সত্ত্বেও, এটি এখনও কিছুটা ক্লান্তিকর। এর সাথে তুলনা করে, ভিবিএ কোডগুলি পেতে এটি ব্যবহার করা আরও দ্রুত হবে। সুতরাং, নিম্নলিখিতগুলিতে, আমরা আপনাকে বিস্তৃত পদক্ষেপ এবং কোডগুলি বলব।
এক আউটলুক পিএসটি ফাইল থেকে অন্যটিতে ফোল্ডার কাঠামোটি অনুলিপি করুন
- একেবারে শুরুতেই আপনার আউটলুক প্রোগ্রামটি চালু করুন।
- তারপরে আউটলুক উইন্ডোতে, “Alt + F11” কী বোতাম টিপুন।
- এরপরে আপনি আউটলুক ভিবিএ সম্পাদক উইন্ডোতে প্রবেশ করবেন।
- পরবর্তী সময়ে, নিম্নলিখিত ভিবিএ কোডগুলি একটি নতুন মডিউলে কপি এবং পেস্ট করুন।
Public objNewPSTFolder As Outlook.Folder
Sub CopyFolderStructure()
Dim objFolders As Outlook.Folders
Dim objFolder As Outlook.Folder
'Get the folders of the source Outlook PST file
Set objFolders = Outlook.Application.Session.Folders("Personal").Folders
'Create the new pst file in your desired local folder and name
Outlook.Application.Session.AddStore "E:\New PST File.pst"
Set objNewPSTFolder = Session.Folders.GetLast()
For Each objFolder In objFolders
CreateFolder objFolder
Next
MsgBox "Completed!", vbOKOnly + vbInformation, "Copy Folder Structure"
End Sub
Sub CreateFolder(objFolder As Outlook.Folder)
Dim objSubFolder As Outlook.Folder
'Only copy the mail folder
If (objFolder.DefaultItemType = olMailItem) Then
'New Outlook PST file auto includes the "Deleted Items" folder, so skip it
'Skip the useless mail folders - "Conversation Action Settings" and "Quick Step Settings"
If (objFolder.Name <> "Deleted Items") And (objFolder.Name <> "Conversation Action Settings") And (objFolder.Name <> "Quick Step Settings") Then
'Create the new folder
objNewPSTFolder.Folders.Add objFolder.Name
Set objNewPSTFolder = objNewPSTFolder.Folders.Item(objFolder.Name)
For Each objSubFolder In objFolder.Folders
CreateFolder objSubFolder
Next
Set objNewPSTFolder = objNewPSTFolder.parent
End If
End If
End Sub
- এর পরে, আপনার ম্যাক্রো সুরক্ষা স্তরটিকে নিম্নে পরিবর্তন করুন।
- পরে ভিবিএ সম্পাদক উইন্ডোতে ফিরে যান এবং ম্যাক্রো চালাতে “F5” কী বোতামটি টিপুন।
- অবশেষে, ম্যাক্রো কাজ শেষ করার পরে, আপনি একটি বার্তা পাবেন, "সম্পূর্ণ!"
- এই মুহুর্তে, আপনি মেল নেভিগেশন ফলকে যেতে পারেন। আপনি একটি নতুন আউটলুক ডেটা ফাইল দেখতে পাবেন যা উত্স পিএসটি ফাইলের মতো একই ফোল্ডারের কাঠামোর মধ্যে রয়েছে যেমন নীচের চিত্রটির মতো:
ডিসপায়ারিং পিএসটি সমস্যাগুলি মোকাবেলা করুন
আউটলুক পিএসটি ত্রুটি প্রবণ হওয়ায় আপনারা অনেকেই অবশ্যই আউটলুকের বিভিন্ন সমস্যার মুখোমুখি হয়েছিলেন। তাদের মুখোমুখি হয়ে আপনি প্রথমে চেষ্টা করার জন্য আউটলুক ইনবক্স মেরামত সরঞ্জামটি ব্যবহার করতে পারেন। যদি এটি ব্যর্থ হয়, আপনি তারপরে আরও শক্তিশালী তৃতীয় পক্ষের সরঞ্জাম প্রয়োগ করতে পারেন DataNumen Outlook Repair, যা যা করতে পারেন আউটলুক ঠিক করুন বাতাসের মতো পিএসটি ত্রুটি।
লেখকের ভূমিকা:
শিরলে জাং একটি ডেটা রিকভারি বিশেষজ্ঞ DataNumen, ইনক। যা তথ্য পুনরুদ্ধারের প্রযুক্তিগুলির সহ বিশ্বের শীর্ষস্থানীয় SQL Server ঠিক করা এবং আউটলুক মেরামত সফ্টওয়্যার পণ্য। আরো তথ্যের জন্য, যান WWW.datanumen.com