Skip to main content

كيفية إنشاء تلقائي لاسم المرسل العزيز عند الرد على رسالة في Outlook؟

Author: Xiaoyang Last Modified: 2025-08-06

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

الطريقة الأولى: إضافة التحية تلقائيًا باستخدام VBA عند الرد على رسائل البريد الإلكتروني (مرنة ولكن تتطلب إعدادًا يدويًا)

الطريقة الثانية: إضافة التحية تلقائيًا عند الرد أو إعادة التوجيه باستخدام أدوات Kutools لـ Outlook 👍 (سريعة وسهلة)


الطريقة الأولى: إضافة التحية تلقائيًا باستخدام VBA عند الرد على رسائل البريد الإلكتروني

يساعدك الكود التالي الخاص بـ VBA على إدراج تحية شخصية تلقائيًا (مثل "عزيزي جون، صباح الخير!") في نص الرسالة بناءً على الوقت الحالي من اليوم.

الخطوة الأولى: افتح محرر VBA في Outlook

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

2. في اللوحة اليسرى أسفل "Project1 (VbaProject.OTM)", قم بتوسيع "Microsoft Outlook Objects" واضغط مرتين على "ThisOutlookSession".

الخطوة الثانية: إدراج كود VBA

انسخ والصق الكود التالي الخاص بـ VBA في المحرر:

Public WithEvents GExplorer As Outlook.Explorer
Public WithEvents GMailItem As Outlook.MailItem

Private Sub Application_Startup()
    Set GExplorer = Outlook.Application.ActiveExplorer
End Sub

Private Sub GExplorer_SelectionChange()
    Dim xItem As Object
    On Error Resume Next
    Set xItem = GExplorer.Selection.Item(1)
    If xItem.Class <> olMail Then Exit Sub
    Set GMailItem = xItem
End Sub

Private Sub GMailItem_Reply(ByVal Response As Object, Cancel As Boolean)
    AutoAddGreetingToReply Response
End Sub

Private Sub GMailItem_ReplyAll(ByVal Response As Object, Cancel As Boolean)
    AutoAddGreetingToReply Response
End Sub

Sub AutoAddGreetingToReply(Item As Object)
    Dim xGreetStr As String
    Dim xReplyMail As MailItem
    Dim xSenderName As String
    Dim xRecipient As Recipient
    On Error Resume Next
    If Item.Class <> olMail Then Exit Sub
    Set xReplyMail = Item
    For Each xRecipient In xReplyMail.Recipients
        If xSenderName = "" Then
            xSenderName = xRecipient.Name
        Else
            xSenderName = xSenderName & "," & xRecipient.Name
        End If
    Next xRecipient
    Select Case Time
           Case 0.3 To 0.5
                xGreetStr = " Good morning!"
           Case 0.5 To 0.75
                xGreetStr = " Good afternoon!"
           Case Else
                xGreetStr = " Good evening!"
    End Select
    With xReplyMail
        .Display
        .HTMLBody = "Dear " & xSenderName & "," & xGreetStr & "" & .HTMLBody
    End With
End Sub

doc-auto-dear-sender-name-1

الخطوة الثالثة: حفظ كود VBA وإعادة تشغيل Outlook

1. اضغط على Ctrl + S لحفظ المشروع.

2. أغلق محرر VBA وأعد تشغيل Outlook ليتم تفعيل الكود.

النتيجة:

كلما قمت بالرد على رسالة بريد إلكتروني، سيقوم Outlook بإدراج التحية تلقائيًا في بداية نص الرسالة.

shot of a greeting at the top of the message body

قيود طريقة VBA:

  • ❌ يتطلب إعدادًا يدويًا : يجب عليك الوصول إلى محرر VBA وتحريره.
  • ❌ يجب تمكين ماكرو: قد تقوم بعض بيئات Outlook بحظر الماكرو.
  • ❌ التنسيق الأساسي: ستكون تنسيقات التحية محدودة إلا إذا قمت بتعديل الكود بشكل أكبر.

📅 إدراج تلقائي للتاريخ والنص في الموضوع أو التوقيع فوراً!

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

💡 نصيحة سريعة: اضغط على أدوات Kutools > الخيارات، ثم قم بتمكين إدراج التاريخ في المواضيع أو التواقيع.

Auto Insert Date into Subject or Signature
إدراج تاريخ تلقائي في التواقيع
إضافة تاريخ تلقائية إلى سطور المواضيع
تنسيق تاريخ مخصص
يعمل على الرسائل الجديدة والردود

الطريقة الثانية: إضافة التحية تلقائيًا عند الرد أو إعادة التوجيه باستخدام أدوات Kutools لـ Outlook 👍

إذا كنت تبحث عن طريقة أسرع وخالية من الأكواد، توفر "أدوات Kutools لـ Outlook" ميزة مضمنة للتحية تقوم تلقائيًا بإضافة اسم المرسل مع التحية عند الرد أو إعادة توجيه رسائل البريد الإلكتروني.

افتح الباب أمام كفاءة البريد الإلكتروني القصوى مع أدوات Kutools لـ Outlook! استمتع بـ 70 ميزات قوية مجانًا تمامًا، إلى الأبد. قم بتنزيل النسخة المجانية الآن!

1. انقر على "Kutools" > "الخيارات" لفتح مربع الحوار "الخيارات".

shot of the Options button

2. في مربع الحوار "الخيارات"، قم بتكوين الإعدادات التالية:

  1. 1). انتقل إلى علامة التبويب "الرد".
  2. 2). قم بتفعيل خيار "إضافة تحية عند إنشاء، الرد على، وإعادة توجيه رسالة بريد إلكتروني". بشكل افتراضي، سيتم عرض Hi <<SenderName>>,  في الصندوق.
  3. ⚡ نصيحة: يمكنك استبدال التحية بنص خاص بك وتخصيصها باستخدام رموز الأسماء التلقائية مثل <<FirstName>>, <<LastName>>, أو <<SenderName>> لإدراج اسم المستلم حسب الحاجة.
  4. 3). انقر على "موافق" لحفظ الإعدادات.

shot of the Options dialog

📌 النتيجة: من الآن فصاعدًا، في كل مرة تقوم فيها بالرد أو إعادة توجيه رسالة بريد إلكتروني، ستقوم أدوات Kutools بإدراج التحية تلقائيًا في بداية نص الرسالة.

shot of a greeting at the beginning of the message body

مزايا طريقة أدوات Kutools لـ Outlook:

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

أي طريقة يجب أن تستخدمها؟

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

الطريقةالأفضل لـسهولة الاستخداموقت الإعدادالمرونة
الطريقة الأولى: VBA المستخدمين الذين يحتاجون إلى حل مخصص ومبنى على البرمجة ⭐⭐ ⏳ طويل ⭐⭐⭐⭐
الطريقة الثانية: أدوات Kutools لـ Outlook المستخدمين الذين يريدون تجربة سريعة وخالية من الأكواد ⭐⭐⭐⭐⭐ ⚡ سريع ⭐⭐⭐⭐⭐

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


أفضل أدوات إنتاجية أوفيس

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

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

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

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

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

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

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

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

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

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

افتح أدوات Kutools لـ Outlook فوراً بنقرة واحدة. لا تنتظر، حمِّله الآن وحقق كفاءة أعلى!

kutools for outlook features1 kutools for outlook features2