جدول المحتويات
في هذه المقالة ، سنعرض لك 5 ماكرو إلى إرسال بريد إلكتروني من Excel . لإثبات أساليبنا ، اخترنا مجموعة بيانات بها 3 أعمدة : " الاسم " و " البريد الإلكتروني " و " المدينة ”.
تنزيل Practice Workbook
استخدام Macro لإرسال Email.xlsm
5 طرق لاستخدام ماكرو لإرسال بريد إلكتروني من Excel
1. استخدام مكتبة كائنات Outlook لإرسال بريد إلكتروني
لأول ماكرو ، سنقوم بتمكين " مكتبة كائنات Microsoft Outlook 16.0 ”إلى أرسل بريدًا إلكترونيًا من Excel . علاوة على ذلك ، نحتاج إلى تسجيل الدخول إلى حساب Outlook في Excel .
الخطوات:
في البداية ، سنقوم بإحضار نافذة Visual Basic .
- أولاً ، من علامة التبويب Developer & gt؛ & gt؛ & gt؛ حدد Visual Basic .
بدلاً من ذلك ، يمكنك الضغط على ALT + F11 لعرض نافذة VBA .
- ثانيًا ، من أدوات & gt؛ & gt؛ & gt؛ حدد " المراجع ... ".
سيظهر مربع حوار جديد .
- ثالثًا ، حدد " مكتبة كائنات Microsoft Outlook 16.0 " ، واضغط على موافق .
وبالتالي ، سنقوم بتمكين مكتبة كائنات Outlook .
- هم من إدراج & gt؛ & gt؛ & gt؛ حدد وحدة .
سنكتب الكود هنا.
- بعد ذلك ، اكتب ما يليكود.
2055
VBA Code Breakdown
- أولاً ، نحن استدعاء الإجراء الفرعي Macro_Send_Email .
- ثانيًا ، نحن نعلن عن أنواع المتغير .
- ثالثًا ، نحن ' أعد تحديد Outlook باعتباره تطبيق البريد .
- ثم نختار البريد الإلكتروني عنوان الإرسال من الخلية C5 .
- بعد ذلك ، يتم تعيين محتوى البريد الإلكتروني في الكود الخاص بنا.
- أخيرًا ، يتم استخدام " VBA Display Property " هنا للعرض بريدنا الإلكتروني . لذلك ، سنحتاج إلى الضغط على إرسال يدويًا إلى إرسال رسائل البريد الإلكتروني . علاوة على ذلك ، يمكننا استخدام " إرسال الخاصية " إلى إرسال رسائل البريد الإلكتروني دون عرض.
- بعد ذلك ، حفظ و أغلق الوحدة النمطية .
الآن ، سنقوم بتشغيل الكود.
- أولاً ، من المطور علامة تبويب & GT ؛ & GT ؛ & GT. حدد وحدات الماكرو .
سيظهر مربع حوار الماكرو .
- ثانيًا ، حدد الإجراء الفرعي “ Macro_Send_Email ”.
- أخيرًا ، اضغط على تشغيل .
بعد تنفيذ الكود ، سنرى نافذة البريد الإلكتروني . يمكننا النقر فوق إرسال . وهكذا ، أظهرنا لك الطريقة الأولى إرسال بريد إلكتروني من excel باستخدام VBA .
اقرأ المزيد: إرسال بريد إلكتروني من Excel VBA بدون Outlook (4 أمثلة مناسبة)
2. ماكرو لإرسال بريد إلكتروني من حساب Gmailفي Excel
لهذه الطريقة ، نحتاج وصول أقل أمانًا للتطبيق من حساب Gmail . بالإضافة إلى ذلك ، سنحتاج إلى تمكين Microsoft CDO من قائمة المراجع .
الخطوات:
- أولاً ، كما هو موضح في الطريقة الأولى ، اعرض مربع حوار المراجع .
- ثانيًا ، حدد " Microsoft CDO لمكتبة Windows 2000 "واضغط على موافق .
- ثالثًا ، انتقل إلى الأمان من حساب Google الخاص بك الإعدادات .
- أخيرًا ، قم بتشغيل وصول أقل أمانًا للتطبيق .
الآن ، سنقوم بالإدخال كودنا ماكرو .
- أولاً ، كما هو موضح في الطريقة 1 ، قم بإحضار نافذة الوحدة النمطية واكتب هذا الرمز.
6670
VBA Code Breakdown
- أولاً ، نحن نتصل بـ الإجراء الفرعي Send_Gmail_Macro .
- ثانيًا ، نحن نعلن عن أنواع المتغير .
- ثالثًا ، نقوم بتعيين محتوى البريد الإلكتروني في الكود الخاص بنا.
- بعد ذلك ، نقدم بيانات اعتماد تسجيل الدخول . تحتاج إلى كتابة معرف و كلمة المرور هنا.
- بعد ذلك ، قمنا بتعيين منفذ إلى 465 .
- أخيرًا ، نحن نرسل بريدنا الإلكتروني .
- ثم حفظ و تشغيل هذا الرمز.
لقد نجحنا في إرسال بريدًا إلكترونيًا إلى عنواننا.
اقرأ المزيد: ماكرو لإرسال بريد إلكتروني من Excel مع النص الأساسي (3حالات مفيدة)
3. أرسل بريدًا إلكترونيًا إلى قائمة المستلمين من عمود
بالنسبة للطريقة الثالثة ، سنقوم بـ إرسال رسائل بريد إلكتروني إلى 7 أشخاص يستخدمون ماكرو من Excel . سنجد آخر صف من مجموعة البيانات ، ومن ثم سيعمل الكود الخاص بنا على قائمة أطول. سنرسل رسائل بريد إلكتروني من النطاق الخلية C5: C10 .
الخطوات:
- أولاً ، كما هو موضح في الطريقة 1 ، اعرض نافذة الوحدة النمطية واكتب هذا الرمز.
4572
VBA Code Breakdown
- أولاً ، نحن نستدعي الإجراء الفرعي Macro_Send_Email_From_A_List .
- ثانيًا ، نعلن عن أنواع المتغير .
- ثالثًا ، نختار Outlook باعتباره بريدنا التطبيق .
- بعد ذلك ، نجد الصف الأخير ، وهو 10 لمجموعة البيانات الخاصة بنا.
- بعد ذلك ، كما يبدأ بريدنا الإلكتروني من الصف 5 أدخلنا 5 كقيمة بداية لـ " متغير z " . علاوة على ذلك ، فإن رسائل البريد الإلكتروني موجودة في العمود C ، ومن ثم قمنا بإدخال 3 داخل خاصية الخلايا .
- بعد ذلك ، نقوم بتعيين محتوى البريد الإلكتروني في الكود الخاص بنا.
- أخيرًا ، يتم استخدام " . العرض " هنا لعرض البريد الإلكتروني . لذلك ، سنحتاج إلى الضغط على إرسال يدويًا إلى إرسال رسائل البريد الإلكتروني . علاوة على ذلك ، يمكننا استخدام " . إرسال " إلى إرسال بريد إلكتروني بدون عرض.
- ثم ، حفظ و تشغيل الوحدة النمطية .
يمكننا أن نرى أن جميع رسائل البريد الإلكتروني معروضة في نسخة مخفية الوجهة> 2>. في الختام ، يمكننا ببساطة الضغط على إرسال لإكمال مهمتنا.
اقرأ المزيد: كيفية إرسال بريد إلكتروني من قائمة Excel (طريقتان فعالتان)
قراءات مماثلة
- كيفية إرسال البريد الإلكتروني تلقائيًا عند استيفاء الشرط في Excel
- كيفية مشاركة ملف Excel عبر الإنترنت (طريقتان سهلتان)
- إرسال بريد إلكتروني تذكير تلقائيًا من ورقة عمل Excel باستخدام VBA
- كيفية إرسال بريد إلكتروني إذا تم استيفاء الشروط في Excel (3 طرق سهلة)
- كيفية تمكين مشاركة المصنف في Excel
4 . ماكرو لإرسال ورقة مفردة باستخدام البريد الإلكتروني
في هذا القسم ، سنرسل ورقة العمل النشطة إلى الشخص المستهدف لدينا. هنا ، سنحتاج إلى اختيار موقع ملف Excel .
الخطوات:
- أولاً ، كما هو موضح في الطريقة 1 ، أظهر نافذة الوحدة النمطية واكتب هذا الرمز.
6853
تحليل رمز VBA
- أولاً ، نحن نستدعي الإجراء الفرعي Macro_Email_Single_Sheet .
- ثانيًا ، نعلن عن أنواع المتغير .
- ثالثًا ، نقوم بنسخ Active Sheet وحفظه على أنه <1 منفصل> Workbook .
- بعد ذلك ، نختار Outlook باعتباره تطبيق البريد .
- ثم نقوم بتعيينمحتوى البريد الإلكتروني في الكود الخاص بنا.
- بعد ذلك ، قمنا بإرفاق ورقة بالبريد الإلكتروني .
- أخيرًا ، استخدم “ .Display ” لعرض بريدنا الإلكتروني . لذلك ، سنحتاج إلى الضغط على إرسال يدويًا إلى إرسال رسائل البريد الإلكتروني . علاوة على ذلك ، يمكننا استخدام " . إرسال " إلى إرسال بريد إلكتروني بدون عرض.
- ثم حفظ و تشغيل الوحدة .
سنرى اسم الورقة في النافذة. اضغط على إرسال لإكمال المهمة.
يمكننا فتح الملف والتحقق من عمل الكود الخاص بنا.
اقرأ المزيد: كيفية إرسال جدول بيانات Excel قابل للتحرير بالبريد الإلكتروني (3 طرق سريعة)
5. ماكرو أرسل بريدًا إلكترونيًا استنادًا إلى قيمة الخلية
بالنسبة للطريقة الأخيرة ، قمنا بتغيير مجموعة البيانات الخاصة بنا قليلاً. لقد أضفنا العمود " الدفعة المستحق ” إلى مجموعة البيانات. هنا ، سنرسل بريدًا إلكترونيًا يحتوي على المدينة " أوباما ". يمكننا أن نرى بوضوح أن الصف 5 يحتوي عليه ، ومن ثم سنرسل بريدًا إلكترونيًا إلى هذا الشخص فقط.
الخطوات:
- أولاً ، كما هو موضح في الطريقة 1 ، أظهر نافذة الوحدة النمطية واكتب هذا الرمز.
3085
VBA Code Breakdown
- أولاً ، نحن إعادة استدعاء أول إجراء فرعي Send_Email_Condition .
- ثانيًا ، نحن نعلن عن الأنواع والإعدادات المتغير " الشروط " كالورقة .
- ثالثًا ، تم العثور على رقم الصف الأخير. علاوة على ذلك ، تبدأ قيمتنا من الصف 5 ، ومن ثم وضعنا الصف 5 إلى آخر صف في الكود الخاص بنا.
- ثم ، اتصل بنا الإجراء الفرعي Send_Email_With_Multiple_Condition .
- بعد ذلك ، نختار Outlook باعتباره تطبيق البريد .
- بعد ذلك ، يتم تعيين محتوى البريد الإلكتروني في الكود الخاص بنا.
- هنا ، نقوم بإرفاق ملف Excel بالبريد الإلكتروني باستخدام طريقة المرفق .
- بعد ذلك ، يتم استخدام " . العرض " هنا لعرض بريدنا الإلكتروني . لذلك ، سنحتاج إلى الضغط على إرسال يدويًا إلى إرسال رسائل البريد الإلكتروني . علاوة على ذلك ، يمكننا استخدام " . إرسال " إلى إرسال بريد إلكتروني بدون عرض.
- ثم حفظ و تشغيل الوحدة .
في الختام ، أظهرنا لك طريقة أخرى للإرسال بريد إلكتروني باستخدام VBA Macro من Excel .
اقرأ المزيد: إرسال رسائل بريد إلكتروني تلقائيًا من Excel استنادًا إلى محتوى الخلية (طريقتان)
قسم الممارسة
لقد أضفنا مجموعات بيانات تدريب لكل طريقة في Excel ملف.
الخاتمة
لقد أظهرنا لك 5 طرقًا لاستخدام ماكرو أرسل بريدًا إلكترونيًا من Excel . شكرا على القراءة ، استمر في التميز!
