كيف ترسل بريدًا إلكترونيًا في Outlook باستخدام VBA؟

تم التحديث: أغسطس 2021 ؛ ينطبق على Microsoft Outlook 365 / 2019/2016

هذه ملاحظة حصلنا عليها من أحد القراء.

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

شكرا على السؤال. يبدو أن إرسال رسائل البريد الإلكتروني تلقائيًا من بين أكثر المهام شيوعًا وإفادة التي يمكنك تشغيلها تلقائيًا باستخدام VBA. تابع القراءة للحصول على مزيد من التفاصيل ونص بسيط لتبدأ من هنا.

كتابة VBA لإرسال رسائل البريد الإلكتروني في Outlook

في المثال البسيط أدناه ، سنغطي الخطوات التالية:

1. أولاً ، سنستخدم نموذج كائن VBA Outlook لإنشاء عنصر بريد إلكتروني جديد.
2. ثم سنمضي قدمًا ونحدد أهمية الرسالة ، والمستلمين (مفصولين بفاصلة منقوطة) ونمط النص الأساسي والمحتوى.
3. ثم سنعرض الرسالة في تطبيق Microsoft Outlook الخاص بك.
4. أخيرًا ، سنمضي قدمًا ونرسله إلى المستلمين.

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

Sub SendMail()
Dim MyEmail As MailItem
Set MyEmail = Application.CreateItem(olMailItem)

With MyEmail
.To = ""
.Importance = olImportanceHigh
.Subject = ""
.Body = ""
.BodyFormat = olFormatHTML
.Display
End With

'I purposely commented the next line, uncomment it by removing the "'" sign to send your email.
' MyEmail.Send
End Sub

اختصار ماكرو Outlook VBA

قد ترغب في النظر في ربط رمز VBA الذي كتبته للتو باستخدام زر أمر في Outlook. سيسمح لك ذلك بتشغيله بسهولة من اختصار موجود في شريط Outlook.

إليك كيفية القيام بذلك:

1. أولاً ، انطلق وافتح Microsoft Outlook.
2. اضغط على ملف ثم حدد الخيارات
3. انتقل الآن وحدد تخصيص الشريط.
4. في قسم تخصيص الشريط ، ستلاحظ مربع قائمة اختيار الأوامر من.
5. حدد وحدات الماكرو
6. ثم حدد رمز VBA الذي تم إنشاؤه حديثًا ، وفي حالتنا ، يجب أن يكون الاسم SendMail.
7. ثم اضغط على إضافة ثم موافق. اختياريًا ، قد ترغب في تعيين رمز للماكرو الخاص بك.
8. سيكون الماكرو الخاص بك متاحًا في شريط أدوات الوصول السريع في الجانب الأيسر العلوي لتطبيق Outlook الخاص بك.

المشاكل المحتملة مع إعدادات الماكرو VBA

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