كيف يمكن تفريغ عناصر الحذف تلقائيًا عند إغلاق أو الخروج من Outlook؟

عند حذف رسالة بريد إلكتروني في Microsoft Outlook، تُنقل الرسالة أولًا إلى مجلدعناصر المحذوفةبدلاً من مسحها نهائيًا. وعلى الرغم من أن هذا التصميم يساعدك في استرداد الرسائل المحذوفة عن طريق الخطأ، إلا أن مجلد عناصر المحذوفة قد يمتلئ بسرعة بالرسائل والمرفقات، مما يستهلك مساحة صندوق البريد وقد يؤثر على أداء Outlook. لذا، يُعد تفريغ مجلد عناصر المحذوفة بانتظام أمرًا ضروريًا للحفاظ على تنظيم صندوق البريد وتجنب امتلائه. ومع ذلك، قد يكون تنفيذ هذه المهمة يدويًا في كل مرة أمرًا مرهقًا، خاصةً إذا كنت تتلقى كمًّا كبيرًا من رسائل البريد الإلكتروني يوميًا. فيما يلي، سنستعرض عدة طرق لتهيئة Outlook لتفريغ مجلد عناصر المحذوفة تلقائيًا عند الخروج—ما يساعدك على تبسيط سير عملك، والحفاظ على نظافة صندوق البريد، وتقليل الجهد اليدوي المطلوب للتنظيف. كما ستجد طرقًا بديلة، مثل استخدام كود VBA لمزيد من التخصيص.

تفريغ عناصر الحذف تلقائيًا عند الإغلاق في Outlook
VBA: تفريغ مجلد عناصر المحذوفة تلقائيًا ونهائيًا دون مطالبة عند الخروج

---

تفريغ عناصر الحذف تلقائيًا عند الإغلاق في Outlook

لأتمتة إزالة الرسائل المحذوفة تلقائيًا في كل مرة تخرج فيها من Outlook، استخدم الخيار المدمج المتوفر في Outlook. يُعد هذا الحل مثاليًا للمستخدمين الذين يبحثون عن إعدادٍ لمرة واحدة دون الحاجة إلى متابعة مستمرة، كما أنه مناسب تمامًا للسيناريوهات التي يتطلب فيها الأمر تنظيف جميع الحسابات في ملف تعريف Outlook الخاص بك عند الخروج.

اتبع الخطوات التالية لتمكين التفريغ التلقائي لمجلد عناصر المحذوفة عند الإغلاق:

1. انقر على علامة التبويبFile، ثم اخترOptions من القائمة.
2. في مربع حوار Outlook Options، انقر علىAdvanced في الشريط الجانبي الأيسر.
3. انتقل إلى قسمبدء Outlook وإغلاقه، وفعّل خانة الاختيار الخاصة بـتفريغ مجلدات العناصر المحذوفة عند الخروج من Outlook.

4. انقر على زرOK لحفظ التغييرات وإغلاق مربع حوار Options.

مع تفعيل هذا الخيار، سيظهر مربع حوار في كل مرة تخرج فيها من Microsoft Outlook لتأكيد رغبتك في الحذف النهائي للعناصر الموجودة في مجلد (أو مجلدات) «عناصر المحذوفة». انقر علىنعمللمتابعة وتفريغ المجلد (أو المجلدات)، أو علىلاللإبقاء على العناصر المحذوفة مؤقتًا.

تُعد هذه الطريقة المدمجة فعّالةً لمعظم إعدادات Outlook الشخصية والمؤسسية، إذ لا تتطلب أي تهيئة معقدة أو أدوات خارجية. وهي مثالية بشكل خاص إذا كنت ترغب في التأكد من تفريغ جميع مجلدات «العناصر المحذوفة» عبر حسابات متعددة تلقائيًا عند إغلاق Outlook. ومع ذلك، هناك بعض النقاط التي يجدر أخذها في الاعتبار:

• تنطبق هذه الوظيفة على جميع الحسابات:عندما يكون هذا الإعداد مفعّلًا، سيتم تفريغ مجلدات «العناصر المحذوفة» تلقائيًا لكل حساب بريد إلكتروني في ملف تعريف Outlook الخاص بك. إذا كنت تدير عدة حسابات بريد إلكتروني وترغب في استهداف أحدها فقط، فقد لا تكون هذه الطريقة مناسبة لك.
• سيتم حذف المجلدات الفرعية:لن يتم حذف الرسائل الموجودة مباشرةً في مجلد عناصر المحذوفة فحسب، بل سيتم أيضًا إزالة أي مجلدات فرعية موجودة داخله.
• لا يمكن تعيين استثناءات:لا تتيح هذه الطريقة تحكمًا دقيقًا، مثل تخطي بعض مجلدات العناصر المحذوفة أو الحفاظ انتقائيًّا على المجلدات الفرعية.

---

VBA: تفريغ مجلد عناصر المحذوفة تلقائيًا ونهائيًا دون مطالبة عند الخروج

للمستخدمين الراغبين في تجاوز مربع التأكيد وأتمتة تفريغ مجلد «العناصر المحذوفة» بالكامل، يُعد حل VBA الخيار الأنسب. فباستخدام VBA، يمكنك تخصيص النص البرمجي ليستهدف حسابات أو مجلدات محددة فقط، وحذف محتوياتها نهائيًّا دون طلب أي تأكيد إضافي. وتُعد هذه الطريقة مثالية خصوصًا للمستخدمين المتقدمين، أو أجهزة الكمبيوتر المشتركة، أو المؤسسات التي تتبع سياسات صارمة بشأن الاحتفاظ بالبيانات.

1. افتح Outlook وحدد أي مجلد (ليس من الضروري تحديد رسالة بريد إلكتروني محددة لهذا النص البرمجي). ثم اضغط علىAlt + F11 لفتح محررMicrosoft Visual Basic for Applications.

2. في نافذة محرر VBA، انتقل إلىInsert > Module لإنشاء وحدة جديدة. ثم انسخ والصق كود VBA التالي في نافذة الوحدة.

كود VBA: تفريغ جميع مجلدات عناصر المحذوفة نهائيًا دون مربع حوار تأكيد

Sub EmptyDeletedItemsSilently()
    Dim store As Outlook.Store
    Dim folder As Outlook.Folder
    Dim i As Integer
    On Error Resume Next
    xTitleId = "KutoolsforOutlook"
    
    For Each store In Outlook.Application.Session.Stores
        Set folder = store.GetDefaultFolder(olFolderDeletedItems)
        
        If Not folder Is Nothing Then
            For i = folder.Items.Count To 1 Step -1
                folder.Items(i).Delete
            Next i
        End If
        
        Set folder = Nothing
    Next store
    
    MsgBox "All Deleted Items folders have been emptied without confirmation.", vbInformation, xTitleId
    
    Set store = Nothing
End Sub

3. اضغط علىF5 أو انقر على زرRun لتنفيذ الكود. سيقوم النص البرمجي فورًا بمسح جميع مجلدات عناصر المحذوفات نهائيًا من جميع الحسابات المُعدَّة في ملف تعريف Outlook الخاص بك، دون عرض أي مربع تأكيد. بعد ذلك، سيظهر مربع رسالة إشعار يؤكد اكتمال العملية.

• مهم:هذه العملية لا رجعة فيها ولا تقوم بنقل العناصر إلى موقع آخر. تأكد جيدًا من محتويات مجلدات العناصر المحذوفة قبل تشغيل الماكرو. وكإجراء احترازي إضافي، فكّر في إنشاء نسخة احتياطية أو استخدام هذه الطريقة فقط مع الحسابات غير الحرجة.