كيفية إيقاف تشغيل أو تعطيل عدم وجود تحذير موضوع في Outlook؟
عند استخدام Outlook 2010 و 2013 ، إذا قمت بإرسال رسائل بريد إلكتروني بدون موضوعات ، فسيظهر مربع موجه بدون موضوع في كل مرة للتذكير. إذا كنت لا تريد حقًا ملء الموضوع ، فسيكون تحذير عدم وجود موضوع مشكلة كبيرة بالنسبة لك. لمساعدة مستخدمي Outlook على التخلص من تحذير عدم الموضوع ، نقدم مهارة في البرنامج التعليمي التالي.
قم بإيقاف تشغيل أو تعطيل عدم وجود تحذير بشأن الموضوع في Outlook
- أتمتة البريد الإلكتروني مع CC السيارات / BCC, إعادة توجيه تلقائي بالقواعد؛ يرسل رد آلي (خارج المكتب) دون الحاجة إلى خادم تبادل...
- احصل على تذكيرات مثل تحذير BCC عند الرد على الكل أثناء تواجدك في قائمة نسخة مخفية الوجهة، و تذكير عند فقدان المرفقات للمرفقات المنسية..
- تحسين كفاءة البريد الإلكتروني مع الرد (الكل) مع المرفقات, إضافة تحية أو التاريخ والوقت تلقائيًا إلى التوقيع أو الموضوع, الرد على رسائل البريد الإلكتروني المتعددة
- تبسيط البريد الإلكتروني مع استدعاء رسائل البريد الإلكتروني, أدوات المرفقات (ضغط الكل، حفظ الكل تلقائيًا...)، إزالة التكراراتو تقرير سريع
قم بإيقاف تشغيل أو تعطيل عدم وجود تحذير بشأن الموضوع في Outlook
في Outlook 2007 ، لا يوجد تحذير إذا كنت ترسل رسالة بريد إلكتروني بدون موضوع. تم تمكين هذه الوظيفة في Outlook 2010 و 2013. ولكن لا توجد ميزة لإيقاف تشغيل أو تعطيل هذا التحذير من الموضوع. في هذا البرنامج التعليمي ، سوف نعرض لك رمز VBA لتحقيق ذلك.
1. الرجاء الضغط قديم + F11 مفاتيح لفتح مربع حوار Microsoft Visual Basic for Applications.
2. قم بتوسيع Project1 > كائنات Microsoft Outlook بالنقر المزدوج عليها. ثم انقر نقرًا مزدوجًا فوق ملف هذه الجلسة لفتح VbaProject.Otm صندوق المحادثة.
3. انسخ والصق رمز VBA أدناه في مربع الحوار.
VBA: إيقاف تشغيل أو تعطيل عدم وجود تحذير بالموضوع
Option Explicit
Private WithEvents oInspectors As Outlook.Inspectors
Private Sub Application_Startup()
Set oInspectors = Outlook.Inspectors
End Sub
Private Sub oInspectors_NewInspector(ByVal Inspector As Inspector)
Dim oItem As Object
On Error GoTo ExitProc
Set oItem = Inspector.CurrentItem
Debug.Print oItem.Sent
If oItem.Sent = False Then
If oItem.Subject = "" Then oItem.Subject = " "
End If
ExitProc:
Set oItem = Nothing
Set Inspector = Nothing
End Sub
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
On Error Resume Next
Item.Subject = Trim(Item.Subject)
End Sub
Private Sub Application_Quit()
Set oInspectors = Nothing
End Sub
4. انقر حفظ زر لحفظ رمز فبا.
5. أعد تشغيل تطبيق Outlook.
ثم يمكن أن يعمل رمز VBA. عند إرسال رسالة بدون موضوع ، لن يتم عرض مربع تحذير "لا يوجد موضوع" بعد الآن.
ملاحظات: تأكد من أن ملف تمكين كافة وحدات الماكرو مربع محدد (يرجى تحديده بالنقر فوق قم بتقديم > مزيد من الخيارات > مركز التوثيق > إعدادات مركز التوثيق ، وفي مركز التوثيق الحوار، اختر إعدادات الماكرو > تمكين كافة وحدات الماكرو) ، انظر لقطات الشاشة:
أفضل أدوات إنتاجية المكتب
كوتولس لتوقعات - أكثر من 100 ميزة قوية لتعزيز توقعاتك
🤖 مساعد بريد الذكاء الاصطناعي: رسائل بريد إلكتروني احترافية فورية مع سحر الذكاء الاصطناعي - بنقرة واحدة للردود العبقرية، والنغمة المثالية، وإتقان متعدد اللغات. تحويل البريد الإلكتروني دون عناء! ...
📧 أتمتة البريد الإلكتروني: خارج المكتب (متوفر لـ POP وIMAP) / جدولة إرسال رسائل البريد الإلكتروني / نسخة تلقائية/نسخة مخفية الوجهة حسب القواعد عند إرسال البريد الإلكتروني / إعادة التوجيه التلقائي (القواعد المتقدمة) / إضافة تحية تلقائية / تقسيم رسائل البريد الإلكتروني متعددة المستلمين تلقائيًا إلى رسائل فردية
📨 إدارة البريد الإلكتروني: استدعاء رسائل البريد الإلكتروني بسهولة / حظر رسائل البريد الإلكتروني الاحتيالية حسب الموضوعات والآخرين / حذف رسائل البريد الإلكتروني المكررة / المزيد من خيارات البحث / توحيد المجلدات
📁 المرفقات برو: حفظ دفعة / فصل دفعة / ضغط دفعة / حفظ تلقائي / فصل تلقائي / ضغط تلقائي
؟؟؟؟ واجهة ماجيك: 😊 المزيد من الرموز التعبيرية الجميلة والرائعة / عزز إنتاجية Outlook الخاص بك باستخدام طرق العرض المبوبة / تصغير Outlook بدلاً من الإغلاق
؟؟؟؟ بنقرة واحدة عجائب: الرد على الكل بالمرفقات الواردة / رسائل البريد الإلكتروني لمكافحة التصيد / 🕘إظهار المنطقة الزمنية للمرسل
👩🏼🤝👩🏻 جهات الاتصال والتقويم: دفعة إضافة جهات الاتصال من رسائل البريد الإلكتروني المحددة / تقسيم مجموعة اتصال إلى مجموعات فردية / إزالة تذكير عيد ميلاد
على مدى ميزات 100 في انتظار الاستكشاف الخاص بك! انقر هنا لاكتشاف المزيد.