في Outlook، قد يكون من السهل علينا إنشاء مهمة من رسالة بريد إلكتروني. ولكن، هل سبق أن جرّبت إنشاء مهمة تلقائيًا عند استلام رسائل بريد معيّنة؟ على سبيل المثال، أرغب فقط في إنشاء مهام تلقائيًا من الرسائل الواردة من مديري. كيف يمكنك تنفيذ هذه المهمة في Outlook؟

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

---

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

لا توجد طريقة مباشرة أو قاعدة محددة لحل هذه المهمة، لكن يمكنني هنا دمج كود VBA مع القاعدة لتحقيق الهدف. يُرجى اتباع الخطوات التالية:

1. افتح Outlook، ثم اضغط مع الاستمرار على مفتاحَي «ALT + F11» لفتح نافذة «Microsoft Visual Basic for Applications».

2. في نافذة «Microsoft Visual Basic for Applications»، انقر مرتين على «ThisOutlookSession» ضمن جزء "Project1 (VbaProject.OTM)" لفتح نافذة الكود، ثم انسخ والصق الكود التالي في الوحدة النمطية الفارغة.

كود VBA: إنشاء مهمة تلقائيًا عند استلام رسائل البريد:

Sub CreateNewTask(Item As Outlook.MailItem)
Dim xNewTask As TaskItem
On Error Resume Next
Set xNewTask = Outlook.CreateItem(olTaskItem)
With xNewTask
    .Subject = Item.Subject
    .StartDate = Item.ReceivedTime
    .DueDate = Item.ReceivedTime + 1
    .Body = Item.Body
    .Importance = olImportanceHigh
    .Save
End With
Set xNewTask = Nothing
End Sub

3. بعد ذلك، احفظ الكود وأغلقه. وبعد إدخال الكود، ستحتاج إلى إنشاء قاعدة. يُرجى النقر على «Rules» > «Manage Rules & Alerts» من علامة التبويب «Home». انظر لقطة الشاشة:

4. في مربع حوار «القواعد والتنبيهات»، انقر على «قاعدة جديدة». انظر لقطة الشاشة:

5. في مربع الحوار المنبثق «معالج القواعد»، اختر «تطبيق القاعدة على الرسائل التي أتلقاها» من قسم «البدء بقاعدة فارغة». انظر لقطة الشاشة:

6. انقر على زر «Next». في قائمة "Step 1: Select condition(s)"، اختر الشرط الذي ترغب في إنشائه. في هذا المثال، سنقوم باختيار خيار «from people or public group». بعد ذلك، في قسم «Step 2: Edit the محتوى القاعدة (click an underlined value)»، انقر على رابط «people or public group» لفتح مربع حوار «عنوان القاعدة»، ثم انقر نقرًا مزدوجًا على عنوان البريد الإلكتروني الذي تريد أن تُنشأ منه المهام تلقائيًا. انظر لقطة الشاشة:

7. انقر على «OK»، ثم اضغط على «Next». في قائمة "Step 1: Select action(s)"، اختر الخيار «run a script». بعد ذلك، ضمن قسم «Step 2: Edit the محتوى القاعدة (click an underlined value)»، انقر على رابط «a script». سيظهر مربع حوار «Select Script»؛ حدّد الماكرو الذي أضفته مسبقًا، ثم انقر على «OK».

8. بعد ذلك، انقر على «Next» > «Next» للوصول إلى شاشة إعداد القاعدة النهائية «Finish». أدخل اسم القاعدة في مربع النص المخصص لذلك في «الخطوة 1: حدد اسمًا لهذه القاعدة»، ثم فعّل الخيار «تشغيل هذه القاعدة» ضمن قسم «الخطوة 2: إعداد خيارات القاعدة». راجع لقطة الشاشة التالية:

9. بعد ذلك، انقر على زر «Finish»، ثم انقر على «OK» لإغلاق مربع حوار «Rules and Alerts».

10. بدءًا من الآن، كلما استلمت رسالة بريد إلكتروني من العنوان المحدد، سيقوم Outlook تلقائيًا بإنشاء المهمة المقابلة. يمكنك الاطلاع على هذه المهام في مجلد المهام الخاص بك. انظر لقطة الشاشة: