Skip to main content

Kutools for Office — مجموعة واحدة. خمسة أدوات. أنجز المزيد.

كيفية إزالة نفسي من حقل إلى/نسخة/نسخة مخفية عند الرد على الكل في Outlook؟

Author Siluvia Last modified

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

إزالة نفسي عند إرسال رسائل البريد الإلكتروني باستخدام كود VBA

نقرة واحدة لإزالة نفسي من الرد على الكل باستخدام أدوات Kutools لـ Outlook


إزالة نفسي عند إرسال رسائل البريد الإلكتروني باستخدام كود VBA

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

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

2. في نافذة Microsoft Visual Basic for Applications، انقر نقرًا مزدوجًا على Project1 > Microsoft Outlook Objects > ThisOutlookSession، ثم قم بنسخ ولصق الكود التالي VBA في نافذة الكود. شاهد لقطة الشاشة:

delete myself address from to filed when reply all using vba 1

كود VBA: إزالة نفسي من جميع رسائل البريد الإلكتروني المرسلة في Outlook

Private Sub RemoveRecipientsWhenItemSend(Item As Outlook.MailItem)
	Dim RemoveAddrList As VBA.Collection
	Dim Recipients As Outlook.Recipients
	Dim aRecipient As Outlook.Recipient
	Dim i
	Dim j
	Set RemoveAddrList = New VBA.Collection
	' add addresses here
	RemoveAddrList.Add "happy.xuebi@163.com"
	RemoveAddrList.Add "siluvia@extendoffice.com"
	Set Recipients = Item.Recipients
	For i = Recipients.Count To 1 Step - 1
		Set aRecipient = Recipients.Item(i)
		For j = 1 To RemoveAddrList.Count
			If LCase$(aRecipient.Address) = LCase$(RemoveAddrList(j)) Then
				Recipients.Remove i
				Exit For
			End If
		Next
	Next
End Sub
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
	On Error Resume Next
	RemoveRecipientsWhenItemSend Item
End Sub
الآن:

1. يرجى تغيير عناوين البريد الإلكتروني في كود VBA إلى حسابات البريد الإلكتروني الخاصة بك.

2. تأكد من تمكين خيار تمكين كافة الوحدات النمطية. شاهد لقطة الشاشة:

delete myself address from to filed when reply all using vba 2

3. انقر على زر الحفظ وأغلق نافذة Microsoft Visual Basic for Applications.

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


نقرة واحدة لإزالة نفسي من الرد على الكل باستخدام أدوات Kutools لـ Outlook

إذا كان لديك أدوات Kutools لـ Outlook، يمكنك إزالة عناوينك من حقول إلى، أو النسخة أو النسخة المخفية عند إرسال رسائل البريد الإلكتروني بنقرة واحدة.

👉 يتوفر الآن إصدار مجاني من أدوات Kutools لـ Outlook، والذي يحتوي على 70+ ميزات مجانية مدى الحياة. قم بتنزيل الإصدار المجاني الآن.

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

delete myself address from to filed when reply all using kutools for outlook 1

1. بعد النقر على زر الرد على الكل لإنشاء رسالة رد، يرجى النقر على Kutools > أسمائي. شاهد لقطة الشاشة:

delete myself address from to filed when reply all using kutools for outlook 2

ثم يتم إزالة جميع أسمائك (عناوين حسابات البريد الإلكتروني) فورًا من حقول إلى، أو النسخة أو النسخة المخفية.

delete myself address from to filed when reply all using kutools for outlook 3

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


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

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

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

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

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

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

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

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

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

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

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

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

kutools for outlook features1 kutools for outlook features2

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

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

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

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