كيف يمكنك الحصول على مطالبة أو تأكيد قبل إرسال رسائل البريد الإلكتروني في Outlook؟

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

الحصول على مطالبة أو تأكيد قبل إرسال رسائل البريد الإلكتروني باستخدام رمز VBA

---

الحصول على مطالبة أو تأكيد قبل إرسال رسائل البريد الإلكتروني باستخدام رمز VBA

سيجعلك رمز VBA التالي تُؤكِّد كل مرة تحاول فيها إرسال رسالة بريد إلكتروني من Outlook، ليمنحك فرصة للتحقق مجددًا من رسالتك.

1. اضغط على «Alt» + "F11" لفتح نافذة «Microsoft Visual Basic for Applications».

2. في نافذة VBA، ابحث عن جزء «Project Explorer» الموجود على اليسار. ضمن "Project1 (VbaProject.OTM)"، انقر مرتين على «Microsoft Outlook Objects»، ثم انقر مرتين على «ThisOutlookSession» لفتح نافذة الكود الخاصة به.

3. انسخ والصق رمز VBA التالي في النافذة المفتوحة:

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim xPrompt As String
    Dim xOkOrCancel As Integer
    On Error Resume Next
    
    xPrompt = "Do you want to continue sending this email?"
    xOkOrCancel = MsgBox(xPrompt, vbOKCancel + vbQuestion, "Confirm Email Sending")
    
    If xOkOrCancel <> vbOK Then
        Cancel = True
    End If
End Sub

4. اضغط على مفتاحي «Alt» + «Q» لإغلاق محرر VBA.

📌النتيجة: بدءًا من الآن، في كل مرة تنقر فيها على زر الإرسال لإرسال رسالة بريد إلكتروني في Outlook، سيظهر مربع حوار تأكيد يسألك: «هل تريد الاستمرار في إرسال هذه الرسالة؟» انقر على «موافق» لإرسالها أو «إلغاء» للعودة إلى الرسالة ومتابعة التعديل.