كيفية إنشاء تلقائي لاسم المرسل الكريم عند الرد على رسالة في Outlook؟
عند الرد على رسائل البريد الإلكتروني في Outlook، من الشائع البدء بتحية مهذبة مثل "عزيزي جون"، يتبعها رسالة مثل "صباح الخير!". ومع ذلك، يمكن أن يكون كتابة هذا يدويًا كل مرة أمرًا مملًا ومُستغرقًا للوقت. يقدم لك هذا البرنامج التعليمي طريقتين فعّالتين لإدراج اسم المرسل والتحية تلقائيًا عند الرد على الرسائل في Outlook:
الطريقة الأولى: إضافة التحية تلقائيًا باستخدام VBA عند الرد على رسائل البريد الإلكتروني (مرنة ولكن تتطلب إعدادًا يدويًا)
الطريقة الثانية: إضافة التحية تلقائيًا عند الرد أو إعادة التوجيه باستخدام أدوات Kutools لـ Outlook 👍 (سريعة وسهلة)
الطريقة الأولى: إضافة التحية تلقائيًا باستخدام VBA عند الرد على رسائل البريد الإلكتروني
الكود التالي VBA يساعدك على إدراج تحيّة شخصية تلقائيًا (مثل "عزيزي جون، صباح الخير!") في نص الرد بناءً على الوقت الحالي من اليوم.
الخطوة 1: فتح محرر VBA في Outlook
1. اضغط على Alt + F11 لفتح نافذة Microsoft Visual Basic for Applications.
2. في الجزء الأيسر أسفل "Project1 (VbaProject.OTM)", قم بتوسيع "Microsoft Outlook Objects" واضغط مرتين على "ThisOutlookSession".
الخطوة 2: إدراج كود 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
الخطوة 3: حفظ كود VBA وإعادة تشغيل Outlook
1. اضغط على Ctrl + S لحفظ المشروع.
2. أغلق محرر VBA وأعد تشغيل Outlook ليتم تفعيل الكود.
النتيجة:
في كل مرة تقوم فيها بالرد على بريد إلكتروني، سيقوم Outlook بإدراج تحية تلقائيًا في بداية نص الرسالة.
قيود طريقة VBA:
- ❌ يتطلب إعدادًا يدويًا : يجب عليك الوصول إلى محرر VBA وتحريره.
- ❌ يجب تمكين ماكروز: قد تمنع بعض بيئات Outlook الماكروز.
- ❌ التنسيق الأساسي: نمط التحية محدود ما لم تقم بمزيد من تعديلات الكود.
📅 إدراج تلقائي للتاريخ والنص في الموضوع أو التوقيع فوراً!
هل تعبت من إضافة التواريخ يدويًا إلى رسائل البريد الإلكتروني؟ مع أدوات Kutools لـ Outlook، يمكنك إدراج التاريخ الحالي وحتى النصوص المخصصة تلقائيًا في موضوع بريدك الإلكتروني أو توقيعه كلما قمت بإنشاء رسالة، الرد عليها، أو إعادة توجيهها. فقط قم بالضبط مرة واحدة، وستقوم Kutools بمعالجتها لك - بسرعة واتساق. 🚀
💡 نصيحة سريعة: انقر على Kutools > الخيارات، ثم قم بتمكين إدراج التاريخ في المواضيع أو التواقيع.

✅ إضافة تلقائية للتاريخ إلى سطور الموضوع
✅ يعمل على رسائل البريد الجديدة والاستجابات
الطريقة الثانية: إضافة التحية تلقائيًا عند الرد أو إعادة التوجيه باستخدام أدوات Kutools لـ Outlook 👍
إذا كنت ترغب في نهج أسرع وخالٍ من الكتابة البرمجية، فإن "أدوات Kutools لـ Outlook" توفر ميزة تحية مضمنة تضيف تلقائيًا اسم المرسل مع تحية عند الرد أو إعادة توجيه الرسائل الإلكترونية.
قل وداعًا لعدم كفاءة Outlook! تجعل أدوات Kutools لـ Outlook معالجة البريد الإلكتروني الدُفعية أسهل - الآن مع ميزات مجانية مدعومة بالذكاء الاصطناعي! قم بتنزيل أدوات Kutools لـ Outlook الآن!!
1. انقر على "Kutools" > "الخيارات" لفتح مربع الحوار "الخيارات".
2. في مربع الحوار "الخيارات"، قم بتكوين ما يلي:
- 1). انتقل إلى علامة التبويب "الرد".
- 2). قم بتفعيل خيار "إضافة تحية عند إنشاء، الرد على، وإعادة توجيه رسالة بريد إلكتروني". بشكل افتراضي، سيظهر Hi <<SenderName>>, في الصندوق.
- 3). انقر على موافق لحفظ الإعدادات.
📌 النتيجة: من الآن فصاعدًا، في كل مرة تقوم فيها بالرد أو إعادة توجيه رسالة بريد إلكتروني، ستقوم أدوات Kutools بإدراج تحية تلقائيًا في بداية نص الرسالة.
مزايا طريقة أدوات Kutools لـ Outlook:
- ✅ لا حاجة إلى كتابة شفرة: قم بتفعيلها بنقرات قليلة.
- ✅ قابل للتخصيص بالكامل: استخدام عناصر نائمة مختلفة وأنماط تحية.
- ✅ يعمل مع الردود وإعادة التوجيه: ينطبق تلقائيًا على كليهما.
- ✅ سير العمل أسرع: يوفر الوقت بدون أي جهد في الإعداد بعد التفعيل.
أي طريقة يجب أن تستخدم؟
فيما يلي مقارنة سريعة بين الطريقتين لمساعدتك في اختيار الأنسب لاحتياجاتك:
الطريقة | الأفضل لـ | سهولة الاستخدام | وقت الإعداد | المرونة |
---|---|---|---|---|
الطريقة 1: VBA | المستخدمون الذين يحتاجون إلى حل مخصص ومبنى على البرامج النصية | ⭐⭐ | ⏳ طويل | ⭐⭐⭐⭐ |
الطريقة 2: أدوات Kutools لـ Outlook | المستخدمون الذين يريدون تجربة سريعة وخالية من البرمجة | ⭐⭐⭐⭐⭐ | ⚡ سريع | ⭐⭐⭐⭐⭐ |
التوصية النهائية:
إذا كنت مرتاحًا مع VBA وتحتاج إلى تحكم متقدم في محتوى التحية، فإن الطريقة 1 هي خيار جيد. لكن بالنسبة لمعظم المستخدمين، الطريقة 2 باستخدام أدوات Kutools لـ Outlook هي أسهل وأكثر الطرق كفاءة لإضافة تحية تلقائيًا بأقل جهد في الإعداد وبدون أي برمجة.
أفضل أدوات تعزيز الإنتاجية في المكتب
خبر عاجل: Kutools لـ Outlook يطلق إصدارًا مجانيًا!
جرب الإصدار الجديد كليًا من Kutools لـ Outlook مع أكثر من100 ميزة مذهلة! انقر لتنزيل الآن!
📧 أتمتة البريد الإلكتروني: الرد التلقائي (متوفر لـ POP وIMAP) / جدولة إرسال البريد الإلكتروني / نسخة تلقائية/مخفية بناءً على القاعدة عند إرسال البريد / التحويل التلقائي (قاعدة متقدمة) / إضافة التحية تلقائيًا / تقسيم تلقائي لرسائل البريد الإلكتروني متعددة المستلمين إلى رسائل فردية ...
📨 إدارة البريد الإلكتروني: استدعاء البريد الإلكتروني / حظر رسائل التصيد بناءً على الموضوعات أو أخرى / حذف البريد الإلكتروني المكرر / البحث المتقدم / تنظيم المجلدات ...
📁 إعدادات المرفقات الاحترافية: حفظ دفعة / فصل دفعة / ضغط دفعة / حفظ تلقائي / تفصيل تلقائي / ضغط تلقائي ...
🌟 جمالية الواجهة: 😊 المزيد من الرموز التعبيرية الجميلة والرائعة / تذكيرك عند وصول رسائل البريد الهامة / تصغير Outlook بدلًا من الإغلاق ...
👍 ميزات بنقرة واحدة: الرد على الجميع مع المرفقات / البريد الإلكتروني المضاد للتصيد / 🕘 عرض المنطقة الزمنية للمرسل ...
👩🏼🤝👩🏻 جهات الاتصال والتقويم: إضافة دفعة لجهات الاتصال من البريد الإلكتروني المحدد / تقسيم مجموعة جهات الاتصال إلى مجموعات فردية / إزالة تذكير عيد الميلاد ...
استخدم Kutools بلغتك المفضلة – يدعم الإنجليزية والإسبانية والألمانية والفرنسية والصينية وأكثر من40 لغة أخرى!
افتح 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