كيف تُرسل دائمًا بريدًا إلكترونيًّا جديدًا من حساب معيّن في Outlook؟

افترض أنك أنشأت عدة حسابات بريد إلكتروني في Outlook، وعند إرسال رسالة جديدة، يُملأ حقل «من» تلقائيًّا بالحساب الذي تعمل منه حاليًّا. ولكن بغض النظر عن الحساب النشط، قد ترغب دائمًا في إرسال رسائلك الجديدة من حساب بريد إلكتروني معيّن. في هذه الحالة، سيساعدك البرنامج التعليمي التالي، إذ توفّر الطريقة الموضّحة فيه الحل المثالي لتحقيق ذلك.

إرسال إنشاء بريد إلكتروني جديد دائمًا من حساب معيّن باستخدام كود VBA

---

إرسال إنشاء بريد إلكتروني جديد دائمًا من حساب معيّن باستخدام كود VBA

يمكن لهذا الكود البرمجي (VBA) أن يساعدك بسهولة على إنشاء وإرسال بريد إلكتروني جديد من حساب معيّن في Outlook. يُرجى اتباع الخطوات التالية.

1. يُرجى الضغط على «Alt» + "F11" لفتح مربع حوار «Microsoft Visual Basic for Applications».

2. قم بتوسيع "Project1" > «كائنات Microsoft Outlook» بالنقر المزدوج عليهما، ثم انقر مرتين على «ThisOutlookSession» لفتح مربع حوار «VbaProject.OTM».

3. انسخ والصق كود VBA أدناه في مربع الحوار.

VBA: إرسال إنشاء بريد إلكتروني جديد دائمًا من حساب معيّن.

Public Sub NewBySpecAccount()
Dim oAccount As Outlook.Account
Dim oMail As Outlook.MailItem
For Each oAccount In Application.Session.Accounts
If oAccount.DisplayName = "Your account name" Then
    Set oMail = Application.CreateItem(olMailItem)
    oMail.SendUsingAccount = oAccount
    oMail.Display
End If
Next
End Sub

4. الآن، غيّر «Your اسم المستخدم» إلى عنوان الحساب البريدي الذي ترغب في استخدامه دائمًا لإنشاء وإرسال بريد إلكتروني جديد.

5. بعد ذلك، اضغط مفتاح "F5" في لوحة المفاتيح لتشغيل كود VBA.

6. بعد تشغيل كود VBA، ستظهر نافذة جديدة باسم «Message»؛ يُرجى إدخال بريدك الإلكتروني فيها ثم النقر على زر «إرسال» لإرساله.

ملاحظة: تم اختبار هذا الكود البرمجي (VBA) بنجاح في Outlook 2007 و2010 و2013، لكن يُرجى عدم تنفيذه في Exchange 2007 و2010.