كيفية الاحتفاظ بالمرفقات عند الرد في Outlook؟

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

الرد مع المرفقات عن طريق النسخ واللصق يدويًا (أساسي وممل)

الرد بنقرة واحدة مع المرفقات باستخدام أدوات Kutools لـ Outlook 👍 (سريع وسهل)

الرد مع المرفقات تلقائيًا باستخدام VBA (تقني ويحتاج إلى إعداد)

الرد مع المرفقات عن طريق النسخ واللصق يدويًا

يمكنك نسخ المرفقات من البريد الإلكتروني يدويًا ولصقها في نافذة الرد قبل إرسالها.

1. افتح Outlook، حدد البريد الإلكتروني الذي تريد الرد عليه، وقم بمراجعته في لوحة القراءة أو افتحه في نافذة منفصلة.

2. انقر فوق أي من المرفقات، ثم انقر على تحديد الكل > نسخ ضمن علامة التبويب المرفقات.

3. انقر على زر الرد لفتح نافذة الرد.

4. في رسالة الرد، انقر في أي مكان داخل نص الرسالة واضغط على Ctrl + V أو انقر على لصق في علامة التبويب الرسالة لإدراج المرفقات المنسوخة.

5. اكتب ردك، راجع المرفقات، وانقر على إرسال.

---

📂 حفظ المرفقات من رسائل البريد الإلكتروني المتعددة بسهولة

هل تشعر بالملل من حفظ المرفقات واحدة تلو الأخرى في Outlook؟ قم بتبسيط سير عملك باستخدام أدوات Kutools لـ Outlook! تتيح لك ميزة حفظ الكل (المرفقات) القوية حفظ المرفقات من رسائل البريد الإلكتروني المتعددة أو المجلدات بأكملها بنقرات قليلة فقط. وداعًا للعمليات اليدوية المملة، وتحكم في بريدك الوارد بسهولة.

تحميل أدوات Kutools لـ Outlook الآن

الرد بنقرة واحدة مع المرفقات باستخدام أدوات Kutools لـ Outlook 👍

للحصول على طريقة سريعة وسهلة للرد مع المرفقات، يمكنك استخدام أدوات Kutools لـ Outlook. ميزة الرد مع المرفقات الأصلية تتيح لك الرد مع الاحتفاظ بالمرفقات الأصلية بنقرة واحدة فقط.

حدد البريد الإلكتروني الذي يحتوي على المرفقات التي تريد الاحتفاظ بها. ثم انقر على Kutools > الرد مع المرفقات الأصلية أو الرد على الجميع مع المرفقات الأصلية.

هذا كل شيء! سيتم تضمين جميع المرفقات من البريد الإلكتروني الأصلي تلقائيًا في رسالة الرد. فقط قم بكتابة رسالتك وانقر على إرسال.

الرد مع المرفقات تلقائيًا باستخدام VBA

بالنسبة للمستخدمين المريحين ببرمجة VBA، هذه الطريقة تؤتمت عملية الرد مع المرفقات. ومع ذلك، تتطلب تمكين ماكروهات في Outlook وإضافة البرنامج النصي يدويًا.

الخطوة 1: افتح محرر VBA

1. حدد رسالة البريد الإلكتروني الذي تريد الرد عليه.

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

3. في اللوحة اليسرى، قم بتوسيع Project1 > Microsoft Outlook Objects. انقر نقرًا مزدوجًا على ThisOutlookSession لفتحه.

الخطوة 2: إدراج رمز VBA

انسخ والصق الكود التالي لـ VBA في نافذة ThisOutlookSession:

Sub RunReplyWithAttachments()
'Update by Extendoffice 20250224
    Dim xReplyItem As Outlook.MailItem
    Dim xItem As Object
    On Error Resume Next
    Set xItem = GetCurrentItem()
    If xItem Is Nothing Then Exit Sub
    Set xReplyItem = xItem.Reply
    CopyAttachments xItem, xReplyItem
    xReplyItem.Display
    Set xReplyItem = Nothing
    Set xItem = Nothing
End Sub

Sub RunReplyAllWithAttachments()
    Dim xReplyAllItem As Outlook.MailItem
    Dim xItem As Object
    Set xItem = GetCurrentItem()
    If xItem Is Nothing Then Exit Sub
    Set xReplyAllItem = xItem.ReplyAll
    CopyAttachments xItem, xReplyAllItem
    xReplyAllItem.Display
    Set xReplyAllItem = Nothing
    Set xItem = Nothing
End Sub

Function GetCurrentItem() As Object
    On Error Resume Next
    Select Case TypeName(Application.ActiveWindow)
        Case "Explorer"
            Set GetCurrentItem = Application.ActiveExplorer.Selection.Item(1)
        Case "Inspector"
            Set GetCurrentItem = Application.ActiveInspector.CurrentItem
    End Select
End Function

Sub CopyAttachments(SourceItem As MailItem, TargetItem As MailItem)
    Dim xFilePath As String
    Dim xAttachment As Attachment
    Dim xFSO As Object
    Dim xTmpFolder As Object
    Dim xFldPath As String
    Set xFSO = CreateObject("Scripting.FileSystemObject")
    Set xTmpFolder = xFSO.GetSpecialFolder(2)
    xFldPath = xTmpFolder.Path & "\"
    For Each xAttachment In SourceItem.Attachments
        If IsEmbeddedAttachment(xAttachment) = False Then
            xFilePath = xFldPath & xAttachment.Filename
            xAttachment.SaveAsFile xFilePath
            TargetItem.Attachments.Add xFilePath, , , xAttachment.DisplayName
            xFSO.DeleteFile xFilePath
        End If
    Next
    Set xFSO = Nothing
    Set xTmpFolder = Nothing
End Sub

Function IsEmbeddedAttachment(Attach As Attachment)
    Dim xAttParent As Object
    Dim xCID As String, xID As String
    Dim xHTML As String
    On Error Resume Next
    Set xAttParent = Attach.Parent
    xCID = Attach.PropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x3712001F")
    If xCID <> "" Then
        xHTML = xAttParent.HTMLBody
        xID = "cid:" & xCID
        If InStr(xHTML, xID) > 0 Then
            IsEmbeddedAttachment = True
        Else
            IsEmbeddedAttachment = False
        End If
    End If
End Function

الخطوة 3: تشغيل ماكرو VBA

1. اضغط على F5 أو انقر على زر التشغيل لتنفيذ الماكرو.

2. في مربع الحوار Macros، حدد ThisOutlookSession.RunReplyAllWithAttachments للرد على الجميع أو حدد ThisOutlookSession.RunReplyWithAttachments للرد على مستلم واحد. انقر على تشغيل.

النتيجة

ستفتح نافذة الرد مع تضمين جميع المرفقات الأصلية. فقط قم بكتابة رسالتك وانقر على إرسال.

الخاتمة: أي طريقة يجب أن تختار؟

إليك مقارنة بين الطرق الثلاث لمساعدتك في تحديد الأنسب لاحتياجاتك:

بالنسبة لمعظم المستخدمين، أدوات Kutools لـ Outlook الخيار الأفضل لأنها الطريقة الأسرع والأبسط للرد مع المرفقات في Outlook. الآن، يمكنك بسهولة الرد مع المرفقات في Outlook باستخدام الطريقة التي تناسب سير عملك! 🚀

عرض توضيحي: نقرة واحدة للرد مع المرفقات باستخدام أدوات Kutools لـ Outlook

مقالات ذات صلة:

• كيفية الاحتفاظ بالمرفقات عند الرد في Outlook؟
• كيفية حفظ جميع المرفقات من رسائل البريد الإلكتروني المتعددة إلى مجلد في Outlook؟
• كيفية إزالة جميع المرفقات من البريد الإلكتروني في Outlook؟

---

أفضل أدوات تعزيز الإنتاجية في المكتب

خبر عاجل: Kutools لـ Outlook يطلق إصدارًا مجانيًا!

جرب الإصدار الجديد كليًا من Kutools لـ Outlook مع أكثر من100 ميزة مذهلة! انقر لتنزيل الآن!

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

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

📨 إدارة البريد الإلكتروني: استدعاء البريد الإلكتروني / حظر رسائل التصيد بناءً على الموضوعات أو أخرى / حذف البريد الإلكتروني المكرر / البحث المتقدم / تنظيم المجلدات ...

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

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

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

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

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

افتح Kutools لـ Outlook فورًا بنقرة واحدة. لا تنتظر، قم بالتنزيل الآن وارتقِ بإنتاجيتك!

جدول أحادي الأبعاد لميزات Kutools لـ Outlook تنزيل الآن انتقل للشراء

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

موصى به بقوة: Kutools لـ Office (خمسة في واحد)

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

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

حول الحزمة ⬇ تنزيل الحزمة 💳 شراء الحزمة