Note: The other languages of the website are Google-translated. Back to English

كيفية الرد بشكل طبيعي في مجلد العناصر المرسلة من Outlook؟ 

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

أرسل رد doc رسائل بريد إلكتروني 1

يمكنك الرد بشكل عادي في مجلد العناصر المرسلة من Outlook باستخدام ميزة "الرد على الكل"

يمكنك الرد بشكل عادي في مجلد "العناصر المرسلة" من Outlook باستخدام رمز VBA


يمكنك الرد بشكل عادي في مجلد العناصر المرسلة من Outlook باستخدام ميزة "الرد على الكل"

في Outlook ، فإن ملف الرد على الجميع يمكن أن تساعدك الميزة في حل هذه المشكلة ، يرجى القيام بذلك على النحو التالي:

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

أرسل رد doc رسائل بريد إلكتروني 2


يمكنك الرد بشكل عادي في مجلد "العناصر المرسلة" من Outlook باستخدام رمز VBA

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

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

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

رمز فبا: الرد بشكل عادي في مجلد العناصر المرسلة من Outlook:

Option Explicit
Private WithEvents GExplorer As Explorer
Private WithEvents GMailItem As MailItem
Private Sub Application_Startup()
    Set GExplorer = Application.ActiveExplorer
End Sub
Private Sub GExplorer_SelectionChange()
   On Error Resume Next
   Set GMailItem = GExplorer.Selection.Item(1)
End Sub
Private Sub GMailItem_Reply(ByVal Response As Object, Cancel As Boolean)
Dim xResponse As MailItem
Dim xRecipients As Outlook.Recipients
Dim xRecipient As Outlook.Recipient
Dim i As Integer
Dim xTo As String, xCC As String, xBCC As String, xName As String
On Error Resume Next
If Application.ActiveExplorer.CurrentFolder <> Session.GetDefaultFolder(olFolderSentMail) Then
    Exit Sub
End If
Cancel = True
Set xResponse = GMailItem.Reply
Set xRecipients = GMailItem.Recipients
For i = xRecipients.Count To 1 Step -1
    Set xRecipient = xRecipients.Item(i)
    xName = xRecipient.Name
    If Left(xName, 1) = "'" Then
        xName = Mid(xName, 2, Len(xRecipient.Name) - 2)
    End If
    Select Case xRecipient.Type
        Case olTo
            xTo = xName & ";" & xTo
        Case olCC
            xCC = xName & ";" & xCC
        Case olBCC
            xBCC = xName & ";" & xBCC
    End Select
Next
With xResponse
    .To = xTo
    .CC = xCC
    .BCC = xBCC
End With
xResponse.Recipients.ResolveAll
xResponse.Display
End Sub

أرسل رد doc رسائل بريد إلكتروني 3

3. بعد ذلك ، احفظ الرمز ، وأعد تشغيل Outlook لأخذ تأثير التعليمات البرمجية ، الآن ، عند النقر فوق رد لإعادة إرسال بريد إلكتروني في المواد المرسلة المجلد ، يتم عرض عنوان المستلم الأصلي في الحقل "إلى" حسب حاجتك.


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

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

تواصل معنا

حقوق التأليف والنشر © 2009 - شبكة الاتصالات العالمية.extendoffice.com. | كل الحقوق محفوظة. مشغل بواسطة ExtendOffice. | | خريطة الموقع
Microsoft وشعار Office هما علامتان تجاريتان أو علامتان تجاريتان مسجلتان لشركة Microsoft Corporation في الولايات المتحدة و / أو دول أخرى.
محمي بواسطة Sectigo SSL