كيف يمكن نقل رسالة البريد الإلكتروني إلى مجلد محدد بعد قراءتها في Outlook؟

يُعد نقل رسالة البريد الإلكتروني إلى مجلد معيّن بعد قراءتها أفضل طريقة للحفاظ على نظافة مجلد البريد الوارد في Outlook. يميل العديد من مستخدمي Outlook إلى إنشاء قاعدة تلقائية لنقل الرسائل التي تمت قراءتها، لكن الواقع أن Outlook لا يدعم هذه الوظيفة عبر معالج القواعد. في هذه المقالة، سنوضح لك كيفية نقل رسائل البريد الإلكتروني إلى مجلد محدّد بعد القراءة باستخدام كود VBA في Outlook.

نقل رسالة البريد الإلكتروني إلى مجلد محدد بعد القراءة في Outlook

نقل رسالة البريد الإلكتروني إلى مجلد محدد بعد القراءة في Outlook

يمكنك نقل رسائل البريد الإلكتروني تلقائيًا إلى مجلد معيّن بعد قراءتها بتشغيل كود VBA في Outlook.

1. أولاً، عليك إنشاء مجلد جديد باسم "تمت مراجعته" داخل مجلد البريد الوارد.

2. افتح مجلد البريد الوارد، ثم اضغط على مفاتيحAlt+F11 لفتح نافذةMicrosoft Visual Basic for Applications.

3. بعد ذلك، انقر مرتين لتوسيعProject1 > كائنات Microsoft Outlook > ThisOutlookSession لفتح محررVbaProject.OTM.

4. بعد ذلك، انسخ والصق كود VBA أدناه في محرر VbaProject.OTM كما هو موضح في لقطة الشاشة أعلاه.

كود VBA: نقل الرسائل بعد القراءة

Sub MoveInbox2Reviewed()
On Error Resume Next
Set oOutlook = CreateObject("Outlook.Application")
Set oNamespace = oOutlook.GetNamespace("MAPI")
Set oFolderSrc = oNamespace.GetDefaultFolder(olFolderInbox)
Set oFolderDst = oFolderSrc.Folders("Reviewed")
Set oFilteredItems = oFolderSrc.Items.Restrict("[UnRead] = False")
For Each oMessage In oFilteredItems
    oMessage.Move oFolderDst
Next
End Sub 

5. بعد ذلك، انقر على زرحفظلحفظ كود VBA، ثم أغلق نافذةMicrosoft Visual Basic for Applications.

6. انقر بزر الماوس الأيمن علىشريط أدوات الوصول السريع، ثم اخترتخصيص شريط أدوات الوصول السريعمن القائمة المنبثقة. انظر لقطة الشاشة:

7. في مربع حوارخيارات Outlook، قم بما يلي:

1). حددماكرومن قائمةاختيار الأوامر منفي القائمة المنسدلة؛

2). حددProject1. ThisOutlookSession في المربع الموجود أسفل خياراختيار الأوامر منالقائمة المنسدلة؛

3). انقر على زرإضافة؛

4). انقر على زرموافق.

8. بعد ذلك، سترى زرماكروالظاهر فيشريط أدوات الوصول السريع. تأكد من أنك في مجلد البريد الوارد الذي تريد نقل جميع الرسائل المقروءة منه، ثم انقر على زرماكرولتشغيل كود VBA داخل مجلد البريد الوارد.

ملاحظات:

1. يمكن تطبيق كود VBA هذا في Outlook 2007 و2010 و2013؛ ولكن في Outlook 2007، يمكنك النقر مباشرةً على زرتشغيللتشغيل الكود.

2. إذا كان لديك عدة حسابات بريد إلكتروني في Outlook، فإن كود VBA يُطبَّق فقط على الحساب المرتبط بملف البيانات المعيَّن كافتراضي. للتحقق من ملف البيانات الافتراضي، انقر علىملف > معلومات > إعدادات الحساب > إعدادات الحسابلفتح مربع حوارإعدادات الحساب. بعد ذلك، انتقل إلى علامة التبويبملف البيانات، وستلاحظ أن ملف البيانات الافتراضي مُعلَّم برمز قبله.

3. إذا كنت ترغب في تغيير ملف البيانات الافتراضي إلى حساب بريد إلكتروني آخر، ففي مربع حوارإعدادات الحساب، يرجى تحديد الحساب الذي تريد تعيينه كافتراضي، ثم انقر علىتعيين كافتراضي.

4. عند تشغيل كود VBA لأول مرة، إذا لاحظت أن الرسائل المقروءة لم تُنقل جميعها دفعة واحدة، يُرجى مواصلة النقر على زر الماكرو حتى تُنقل كل الرسائل المقروءة من البريد الوارد بنجاح.

---

أفضل أدوات إنتاجية Office

جرِّب Kutools لـ Outlook الجديد كليًّا مع 100+ ميزة رائعة!انقر للتنزيل الآن!

🤖KUTOOLS AI:يستخدم تقنية ذكاء اصطناعي متقدمة للتعامل مع رسائل البريد الإلكتروني بسلاسة، بما في ذلك الرد عليها، وتلخيصها، وتحسينها، وتوسيعها، وترجمتها، وصياغتها.

📧أتمتة البريد الإلكتروني: الرد التلقائي (متوفر لبروتوكولي POP وIMAP) / جدولة إرسال رسائل البريد الإلكتروني / نسخة تلقائية/مخفية وفق القواعد عند إرسال البريد الإلكتروني / التحويل التلقائي (قاعدة متقدمة) / إضافة التحيّة تلقائيًّا / تقسيم رسائل البريد الإلكتروني ذات المستلمين المتعددين تلقائيًّا إلى رسائل فردية...

📨إدارة البريد الإلكتروني: استدعاء البريد الإلكتروني / حظر رسائل الاحتيال حسب العناوين وغيرها / حذف الرسائل المكررة / البحث المتقدم / تنظيم المجلدات...

📁المرفقات الاحترافية: حفظ دفعة واحدة / فصل دفعة واحدة / ضغط دفعة واحدة / حفظ تلقائي / تفصيل تلقائي / ضغط تلقائي...

🌟سحر الواجهة: 😊إيموجيات أكثر جمالًا وروعة / إشعارك عند وصول رسائل بريد إلكتروني مهمة / تصغير Outlook بدلًا من إغلاقه...

👍عجائب النقرة الواحدة: الرد على الجميع مع المرفقات / الحماية من رسائل التصيد الاحتيالي / 🕘عرض منطقة الوقت الحالي للمرسل...

👩🏼‍🤝‍👩🏻جهات الاتصال والتقويم: إضافة جهات اتصال دفعةً واحدة من رسائل البريد الإلكتروني المحددة / تقسيم مجموعة جهات الاتصال إلى مجموعات فردية / إزالة تذكير عيد الميلاد...

استخدم Kutools باللغة التي تفضلها – يدعم الإنجليزية، الإسبانية، الألمانية، الفرنسية، الصينية، وأكثر من 40 لغة أخرى!

افتح Kutools لـ Outlook بنقرة واحدة فورًا! لا تنتظر، نزِّله الآن وحسِّن كفاءتك!

قائمة ميزات Kutools لـ Outlook      نزِّل الآن      اذهب للشراء

🚀 التنزيل بنقرة واحدة — احصل على جميع إضافات Office

موصى به بشدة: Kutools for Office (5 في 1)

نقرة واحدة لتنزيلخمسة برامج تثبيتدفعة واحدة —Kutools لـ Excel وOutlook وWord وPowerPointوOffice Tab Pro.انقر للتنزيل الآن!

• ✅سهولة النقرة الواحدة: نزِّل جميع حزم الإعداد الخمس دفعة واحدة!
• 🚀جاهز لأي مهمة في Office: ثبِّت الإضافات التي تحتاجها، متى احتجتَ إليها.
• 🧰متضمَّن: Kutools لـ Excel / Kutools لـ Outlook / Kutools for Word / Office Tab Pro / Kutools for PowerPoint

حول الحزمة⬇ نزِّل الحزمة💳 اشترِ الحزمة