در این مقاله، 5 ماکرو را برای ارسال ایمیل از Excel به شما نشان خواهیم داد. برای نشان دادن روش‌های خود، مجموعه داده‌ای با 3 ستون انتخاب کرده‌ایم: « نام »، « ایمیل »، و « شهر "

دانلود کتاب تمرین تمرین

5 روش استفاده از ماکرو برای ارسال ایمیل از اکسل

1. استفاده از Outlook Object Library برای ارسال ایمیل

برای اولین Macro ، ما "<1" را فعال می کنیم>Microsoft Outlook 16.0 Object Library " به ارسال یک ایمیل رایانامه از Excel . علاوه بر این، ما باید به حساب Outlook خود در Excel وارد شویم.

مراحل:

در ابتدا، ما پنجره Visual Basic را باز می کنیم.

• ابتدا، از برگه Developer >>> Visual Basic را انتخاب کنید.

از طرف دیگر، می توانید ALT + F11 را فشار دهید تا پنجره VBA نمایش داده شود.

• دوم، از ابزار >>> " مرجع… " را انتخاب کنید.

یک کادر گفتگوی جدید ظاهر خواهد شد.

• سوم، " Microsoft Outlook 16.0 Object Library " را انتخاب کنید و OK را فشار دهید.

بنابراین، Outlook Object Library را فعال می کنیم. .

• آنها را از درج >>> Module را انتخاب کنید.

ما کد خود را در اینجا تایپ می کنیم.

• پس از آن، موارد زیر را تایپ کنیدکد.

3170

تجزیه کد VBA

• ابتدا فراخوانی Sub Procedure Macro_Send_Email .
• ثانیاً، ما انواع متغیر را اعلام می کنیم.
• ثالثاً، ما' دوباره Outlook را به عنوان برنامه ایمیل انتخاب می کنیم.
• سپس، آدرس ایمیل ارسال را از سلول C5<2 انتخاب می کنیم>.
• پس از آن، محتوای ایمیل در کد ما تنظیم می شود.
• در نهایت، " ویژگی نمایش VBA " در اینجا برای نمایش استفاده می شود. ایمیل ما. بنابراین، ما باید Send را به صورت دستی برای ارسال ایمیل فشار دهیم. علاوه بر این، می‌توانیم از « ارسال ویژگی » برای ارسال ایمیل بدون نمایش استفاده کنیم.

• پس از آن، ذخیره و Module را ببندید.

اکنون، کد را اجرا می کنیم .

• ابتدا، از برنامه نویس برگه >>> Macros را انتخاب کنید.

کادر محاوره ای Macro ظاهر می شود.

• ثانیاً ، رویه فرعی " Macro_Send_Email " ما را انتخاب کنید.
• در نهایت، Run را فشار دهید.

پس از اجرای کد، پنجره ایمیل را خواهیم دید. می توانیم روی ارسال کلیک کنیم. بنابراین، ما اولین روش ارسال یک ایمیل از اکسل با استفاده از VBA را به شما نشان دادیم.

بیشتر بخوانید: ارسال ایمیل از Excel VBA بدون Outlook (4 مثال مناسب)

2. ماکرو برای ارسال ایمیل از حساب Gmailدر اکسل

برای این روش، به دسترسی کمتر امن برنامه از حساب Gmail نیاز داریم. علاوه بر این، ما باید Microsoft CDO را از منوی References فعال کنیم.

مراحل:

• در مرحله اول، همانطور که در روش اول نشان داده شده است ، کادر محاوره ای منابع را باز کنید.
• در مرحله دوم، " Microsoft CDO for Windows 2000 Library را انتخاب کنید. و OK را فشار دهید.

• سوم، از حساب Google خود به امنیت بروید تنظیمات .
• در نهایت، دسترسی کمتر امن به برنامه را روشن کنید .

اکنون، ما وارد می کنیم کد ماکرو ما.

• ابتدا، همانطور که در روش 1 نشان داده شده است، پنجره Module را باز کرده و این کد را تایپ کنید.

8573

تجزیه کد VBA

• ابتدا، ما با روش فرعی Send_Gmail_Macro .
• ثانیاً، ما انواع متغیر را اعلام می کنیم.
• سوم، ما در حال تنظیم ایمیل محتوای موجود در کد ما.
• سپس، اعتبارنامه ورود را ارائه می‌کنیم. شما باید ID و گذرواژه خود را در اینجا تایپ کنید.
• پس از آن، پورت را به 465<تنظیم کرده ایم. 2>.
• در نهایت، ما ایمیل خود را ارسال می کنیم.

• سپس، ذخیره و این کد را اجرا کنید.

ما با موفقیت یک ایمیل رایانامه به آدرس خود ارسال کردیم.

بیشتر بخوانید: ماکرو برای ارسال ایمیل از اکسل با بدنه (3موارد مفید)

3. ارسال ایمیل به فهرستی از گیرندگان از یک ستون

برای روش سوم، ما به ارسال ایمیل به 7 افرادی که از ماکرو از اکسل استفاده می کنند. ما آخرین ردیف مجموعه داده خود را پیدا خواهیم کرد، بنابراین کد ما برای لیست طولانی‌تری کار خواهد کرد. ما ایمیل را از محدوده سلول C5:C10 ارسال خواهیم کرد.

مراحل:

• ابتدا، همانطور که در روش 1 نشان داده شده است ، پنجره Module را باز کرده و این کد را تایپ کنید.

2423

تجزیه کد VBA

• ابتدا، ما با رویه فرعی Macro_Send_Email_From_A_List تماس می گیریم. 21>.
• ثانیاً، ما انواع متغیر را اعلام می کنیم.
• سوم، Outlook را به عنوان ایمیل خود انتخاب می کنیم. برنامه .
• سپس، آخرین ردیف را پیدا می کنیم که 10 برای مجموعه داده ما است.
• پس از آن، به عنوان ایمیل ما از ردیف 5 شروع می شود، 5 را به عنوان مقدار شروع برای " متغیر z " وارد کرده ایم. . علاوه بر این، ایمیل‌های ما در ستون C هستند، از این رو 3 را در داخل ویژگی Cells وارد کرده‌ایم.
• سپس، محتوای ایمیل را در کد خود تنظیم می کنیم.
• در نهایت، " .Display " در اینجا برای نمایش ایمیل<2 ما استفاده می شود> بنابراین، ما باید Send را به صورت دستی برای ارسال ایمیل فشار دهیم. علاوه بر این، ما می توانیم از " .Send " برای ارسال ایمیل بدون نمایش استفاده کنیم.

• سپس، ذخیره و اجرا ماژول .

می بینیم که همه ایمیل های ما در <نمایش داده می شوند 1>BCC . در خاتمه، می‌توانیم به سادگی Send را فشار دهیم تا کارمان تکمیل شود.

بیشتر بخوانید: نحوه ارسال ایمیل از فهرست اکسل (2 روش موثر)

خواندنی مشابه

• نحوه ارسال ایمیل به صورت خودکار در صورت برآورده شدن شرایط در اکسل
• نحوه اشتراک گذاری آنلاین فایل اکسل (2 روش آسان)
• ارسال ایمیل یادآوری به صورت خودکار از کاربرگ Excel با استفاده از VBA
• نحوه ارسال ایمیل در صورت وجود شرایط در اکسل (3 روش آسان)
• نحوه فعال کردن Share Workbook در Excel

4 ماکرو برای ارسال یک برگه با استفاده از ایمیل

در این بخش، کاربرگ فعال را برای فرد مورد نظر خود ارسال می کنیم. در اینجا، ما باید محل فایل Excel خود را انتخاب کنیم.

مراحل:

• ابتدا، همانطور که در روش 1 نشان داده شده است ، پنجره Module را باز کرده و این کد را تایپ کنید.

8121

تجزیه کد VBA

• ابتدا، ما با رویه فرعی Macro_Email_Single_Sheet تماس می گیریم.
• ثانیاً، ما انواع متغیر را اعلام می کنیم.
• ثالثاً، Active Sheet را کپی می کنیم و آن را به عنوان یک <1 جداگانه ذخیره می کنیم>Workbook .
• پس از آن، Outlook را به عنوان برنامه ایمیل انتخاب می کنیم.
• سپس، ما در حال تنظیم ایمیل محتوای موجود در کد ما.
• پس از آن، برگ را به ایمیل پیوست کردیم.
• در نهایت ، از " .Display " برای نمایش ایمیل ما استفاده کنید. بنابراین، ما باید Send را به صورت دستی برای ارسال ایمیل فشار دهیم. علاوه بر این، ما می توانیم از " .Send " برای ارسال ایمیل بدون نمایش استفاده کنیم.

• سپس، ذخیره و Module را اجرا کنید.

نام صفحه را در پنجره خواهیم دید. Send را فشار دهید تا کار تکمیل شود.

میتوانیم فایل را باز کنیم و تأیید کنیم کد ما کار می کند.

بیشتر بخوانید: نحوه ارسال یک صفحه گسترده اکسل قابل ویرایش از طریق ایمیل (3 روش سریع)

5. ماکرو به ارسال ایمیل بر اساس مقدار سلول

برای روش آخر، مجموعه داده خود را کمی تغییر داده ایم. ما ستون پرداخت سررسید را به مجموعه داده اضافه کرده ایم. در اینجا، یک ایمیل ارسال خواهیم کرد که حاوی شهر " اوباما " است. ما به وضوح می‌بینیم که ردیف 5 حاوی آن است، بنابراین یک یک ایمیل فقط برای آن شخص ارسال می‌کنیم.

مراحل:

• ابتدا، همانطور که در روش 1 نشان داده شده است ، پنجره Module را باز کرده و تایپ کنید این کد.

1623

تجزیه کد VBA

• اول، ما دوباره با اولین Sub Procedure Send_Email_Condition تماس می گیریم.
• ثانیاً، ما انواع و تنظیمات Variable را اعلام می کنیم" شرایط " به عنوان برگ ما.
• سوم، آخرین ردیف شماره یافت می‌شود. علاوه بر این، مقدار ما از ردیف 5 شروع می شود، بنابراین ردیف 5 را به آخرین ردیف در کد خود قرار داده ایم.
• سپس، با دومین روش فرعی Send_Email_With_Multiple_Condition تماس بگیرید.
• بعد از آن، Outlook را به عنوان برنامه ایمیل خود انتخاب می کنیم.
• سپس، محتوای ایمیل در کد ما تنظیم می‌شود.
• در اینجا، ما فایل Excel را با ایمیل پیوست می‌کنیم. با استفاده از روش پیوست .
• پس از آن، " .Display " در اینجا برای نمایش ایمیل ما استفاده می شود. بنابراین، ما باید Send را به صورت دستی برای ارسال ایمیل فشار دهیم. علاوه بر این، ما می توانیم از " .Send " برای ارسال ایمیل بدون نمایش استفاده کنیم.

• سپس، ذخیره و ماژول را اجرا کنید.

در پایان، ما روش دیگری را برای ارسال <به شما نشان داده ایم. 2>یک ایمیل با استفاده از VBA Macro از Excel .

بیشتر بخوانید: ارسال خودکار ایمیل از اکسل بر اساس محتوای سلول (2 روش)

بخش تمرین

ما مجموعه داده‌های تمرینی را برای هر روش در Excel اضافه کرده‌ایم پرونده.

نتیجه گیری

ما 5 روش استفاده از ماکرو را به شما نشان دادیم ارسال یک ایمیل از اکسل . از خواندن متشکریم، به عالی بودن ادامه دهید!