কীভাবে কোনও ফোল্ডারে আইটেমগুলিকে আউটলুকে মুছে ফেলার পূর্বে এর মূল ফোল্ডারে সরিয়ে নেওয়া যায়

এখন শেয়ার:

ডিফল্টরূপে, আউটলুক-এ, আপনি যখন কোনও ফোল্ডার মুছবেন, এর আইটেমগুলি "মোছা আইটেমগুলি" ফোল্ডারে সরানো হবে। যদি আপনি আউটলুক মুছে ফেলার আগে কোনও ফোল্ডারে থাকা আইটেমগুলিকে তার প্যারেন্ট ফোল্ডারে সরিয়ে নিতে চান তবে আপনি এই নিবন্ধে ভাগ করা উপায়গুলি ব্যবহার করতে পারেন।

যখন আপনি একটি ফোল্ডার ডিলিট করেন, Outlook আপনাকে সতর্ক করে যে এর ভেতরের সমস্ত কিছুও “ডিলিটেড আইটেমস” ফোল্ডারে চলে যাবে। কিন্তু, বেশিরভাগ সময়, আপনি কেবল এই ফোল্ডারটি ডিলিট করতে চান, এর ভেতরের আইটেমগুলো ছাড়া। তাই, আপনি আশা করেন যে আইটেমগুলো স্বয়ংক্রিয়ভাবে ফোল্ডারটির প্যারেন্ট ফোল্ডারে চলে যাবে। এখানে আমরা আপনাকে VBA ব্যবহার করে এটি কীভাবে করা যায় তা শেখাব। আপনি যদি VBA সম্পর্কে কিছুই না জানেন, তাহলে আপনি প্রথমে আমার আগের আর্টিকেলটি পড়তে পারেন – “আপনার আউটলুকে কীভাবে ভিবিএ কোড চালাবেন"।এটি কোনও আউটলুকে মোছার আগে একটি ফোল্ডারে আইটেমগুলি এর পিতামতী ফোল্ডারে স্থানান্তরিত করে

ফোল্ডারে আইটেমগুলি মুছে ফেলার আগে এটির মূল ফোল্ডারে

  1. শুরু করতে, "Alt + F11" এর মাধ্যমে আউটলুক ভিবিএ সম্পাদক অ্যাক্সেস করুন।
  2. তারপরে, নতুন উইন্ডোতে, "এই আউটলুকসেশন" প্রকল্পটি খুলুন।
  3. পরবর্তীকালে, এই প্রকল্পে নিম্নলিখিত ভিবিএ কোডটি অনুলিপি করুন এবং আটকান।
'Display the macro in the context menu
Sub Application_FolderContextMenuDisplay(ByVal CommandBar As Office.CommandBar, ByVal Folder As Outlook.Folder)
    Dim objCommandBarButton As Office.CommandBarButton
 
    Set objCommandBarButton = CommandBar.Controls.Add(msoControlButton)
    With objCommandBarButton
         .Style = msoButtonIconAndCaption
         .Caption = "[Smart] Delete Folder"
         .FaceId = 1668
         .OnAction = "Project1.ThisOutlookSession.DeleteFolder_MoveItemsToParentFolder"
    End With
End Sub

Sub DeleteFolder_MoveItemsToParentFolder()
    Dim objCurrentFolder As Outlook.Folder
    Dim objParentFolder As Outlook.Folder

    Set objCurrentFolder = Outlook.ActiveExplorer.CurrentFolder
    Set objParentFolder = objCurrentFolder.Parent
    
    Dim i As Long
    'Move items to parent folder
    For i = objCurrentFolder.Items.Count To 1 Step -1
        objCurrentFolder.Items.Item(i).Move objParentFolder
    Next
 
    'Delete the current folder
    objCurrentFolder.Delete
End Sub

এই আউটলুকসেশন প্রকল্পে কোড অনুলিপি করুন

  1. এর পরে, আপনি এখন একটি শট করতে পারেন।
  2. প্রথমে, আপনি মুছতে চান এমন সাবফোল্ডারটি ডান ক্লিক করুন।
  3. তারপরে, প্রসঙ্গ মেনু থেকে, "[স্মার্ট] ফোল্ডার মুছুন" বিকল্পটি চয়ন করুন।স্মার্ট একটি ফোল্ডার মুছুন
  4. একবারে, আউটলুক ফোল্ডারটি মুছে ফেলবে এবং এর আইটেমগুলিকে তার মূল ফোল্ডারে স্থানান্তরিত করবে।
  5. আমার উদাহরণে, আমি "টু বব" সাবফোল্ডারটি মুছে ফেলছি। এর মূল ফোল্ডারটি হ'ল "পাঠানো আইটেম"। অতএব, এর সমস্ত আইটেম নীচের স্ক্রিনশটের মতো "প্রেরিত আইটেমগুলিতে" সরানো হয়েছে।আইটেমগুলি অটো প্যারেন্ট ফোল্ডারে সরানো হয়েছে

মনে রাখবেন যে আউটলুকটি ক্ষতিগ্রস্থ

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

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

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

এখন শেয়ার:

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