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

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

قم بإعادة توجيه المرفقات بناءً على معايير محددة فقط إلى شخص باستخدام رمز VBA تلقائيًا

قم بإعادة توجيه المرفقات بناءً على معايير محددة فقط إلى شخص باستخدام رمز VBA تلقائيًا

على سبيل المثال ، عند تلقي رسالة بريد إلكتروني يحتوي موضوعها على النص "kto feature" ، ستتم إعادة توجيه جميع مرفقات هذا البريد الإلكتروني إلى الشخص المحدد تلقائيًا بدون نص الرسالة. يمكن أن تساعدك الخطوات التالية ، يرجى القيام بذلك على النحو التالي:

1. اضغط باستمرار على ALT + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. في ميكروسوفت فيسوال باسيك للتطبيقات نافذة ، انقر مرتين هذه الجلسة من مشروع 1 (VbaProject.OTM) لفتح الوضع ، ثم انسخ الكود التالي والصقه في الوحدة النمطية الفارغة.

رمز فبا: إعادة توجيه البريد الإلكتروني تلقائيًا بدون نص الرسالة ولكن قم فقط بتضمين المرفقات:

Public WithEvents ReceivedItems As Outlook.Items
Private Sub Application_Startup()
    Set ReceivedItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub ReceivedItems_ItemAdd(ByVal Item As Object)
    Dim xForwardMail As Outlook.MailItem
    Dim xEmail As MailItem
    On Error Resume Next
    If Item.Class <> olMail Then Exit Sub
    Set xEmail = Item
    If InStrRev(UCase(xEmail.Subject), UCase("kto feature")) = 0 Then Exit Sub  'change subject text to your need
    If xEmail.Attachments.Count = 0 Then Exit Sub
    Set xForwardMail = xEmail.Forward
    With xForwardMail
        .HTMLBody = ""
        With .Recipients
            .Add "skyyang@addin88.com"    'change address to your own
            .ResolveAll
        End With
        .Send
    End With
End Sub

ملاحظة: في الكود أعلاه ، يجب عليك تغيير نص الموضوع وعنوان المستلم إلى عنوانك الخاص.

3. ثم احفظ الرمز ، وأعد تشغيل Outlook لاتخاذ تأثير التعليمات البرمجية.

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

ملاحظة: هذا الرمز متاح فقط للحساب الافتراضي.

Kutools for Outlook - يجلب 100 ميزة متقدمة إلى Outlook ، ويجعل العمل أسهل كثيرًا!

• CC السيارات / BCC حسب القواعد عند إرسال البريد الإلكتروني ؛ إعادة توجيه تلقائي رسائل بريد إلكتروني متعددة حسب الطلب ؛ رد آلي بدون خادم صرف ، والمزيد من الميزات التلقائية ...
• تحذير BCC - إظهار الرسالة عند محاولة الرد على الكل إذا كان عنوان بريدك في قائمة BCC; تذكير عند فقدان المرفقات، والمزيد من ميزات التذكير ...
• رد (الكل) بكل المرفقات في محادثة البريد; الرد على العديد من رسائل البريد الإلكتروني في ثوان؛ إضافة تحية تلقائية عند الرد إضافة التاريخ إلى الموضوع ...
• أدوات المرفقات: إدارة جميع المرفقات في جميع الرسائل ، فصل تلقائي, ضغط الكل، إعادة تسمية الكل ، حفظ الكل ... تقرير سريع ، عد الرسائل المختارة...
• رسائل البريد الإلكتروني غير الهامة القوية حسب العرف قم بإزالة الرسائل المكررة وجهات الاتصال... تمكنك من أداء أذكى وأسرع وأفضل في Outlook.

اقرأ أكثر... التحميل الان...