فهرست مطالب
این آموزش نحوه استفاده از ماکرو اکسل برای ارسال خودکار ایمیل را نشان می دهد. ما می توانیم ویژگی پستی خود را با استفاده از VBA ماکرو پیکربندی کنیم. بنابراین، با استفاده از ماکرو VBA میتوانیم یک ایمیل به چندین کاربر به طور همزمان ارسال کنیم. ما باید Outlook را روی دستگاه خود نصب کرده باشیم تا بتوانیم ایمیل را به صورت خودکار با ماکرو ارسال کنیم. زیرا کدی که درج خواهیم کرد از Outlook برای ارسال ایمیل به گیرندگان استفاده می کند.
دانلود کتاب تمرین تمرین
می توانید کتاب تمرین تمرین را از اینجا دانلود کنید.
ارسال ایمیل Automatically.xlsm
3 نمونه های مناسب از ماکرو اکسل برای ارسال خودکار ایمیل
در طول این مقاله، 3 را نشان خواهیم داد نمونه های مناسب استفاده از ماکرو اکسل برای ارسال خودکار ایمیل به گیرندگان. قبل از شروع به توضیح مثال، باید چیزی را در برگه اکسل خود اصلاح کنیم. قبل از اعمال ماکرو برای ارسال خودکار ایمیل، مراحل زیر را تکمیل کنید.
STEPS:
- ابتدا، از مجموعه داده خود، به برگه Developer<بروید. 2>. گزینه Visual Basic را انتخاب کنید.
- بعد، به تب Tool بروید و گزینه را انتخاب کنید مراجع .
- یک کادر گفتگوی جدید با نام " References – VBAProject " باز می شود.
- در نهایت، گزینه " Microsoft Office 16.0 Object Library " را علامت بزنید و روی OK کلیک کنید.
1. از Excel VBA Macro برای ارسال استفاده کنیدایمیل به صورت خودکار بر اساس مقدار سلول
اول و مهمتر از همه، ما از ماکرو excel VBA برای ارسال خودکار ایمیل بر اساس یک مقدار سلول خاص در مجموعه داده خود استفاده می کنیم. برای توضیح این مثال از مجموعه داده زیر استفاده خواهیم کرد. اگر مقدار سلول در سلول D6 بزرگتر از 400 باشد، به صورت خودکار ایمیلی ارسال می کنیم.
بیایید مراحل انجام این عمل را ببینیم.
STEPS:
- برای شروع، راست – کلیک کنید در برگه " Based on Cell ".
- علاوه بر این، گزینه " مشاهده کد " را انتخاب کنید.
- عمل فوق یک پنجره کد VBA خالی برای آن کاربرگ باز می کند. راه دیگر برای باز کردن آن پنجره کد این است که Alt + F11 را فشار دهید.
- علاوه بر این، کد زیر را در آن پنجره کد تایپ کنید:
4993
- سپس، روی دکمه Run کلیک کنید یا کلید F5 را فشار دهید تا کد اجرا شود.
- یک کادر گفتگوی جدید با نام Macros ظاهر می شود.
- پس از آن، در قسمت Macro Name ماکرو ' send_mail_outlook<2 را انتخاب کنید>'.
- اکنون روی دکمه Run کلیک کنید.
- در نهایت، از این پس سلول مقدار در سلول D6 > 400 یک ایمیل در Outlook به طور خودکار با گیرندگان خاصی تولید می شود. برای ارسال ایمیل فقط باید روی دکمه ارسال کلیک کنیم.
خواندنبیشتر: ارسال خودکار ایمیل از اکسل بر اساس محتوای سلول (2 روش)
2. ارسال خودکار ایمیل بر اساس تاریخ سررسید با ماکرو VBA
در روش دوم، ما از ماکرو Excel VBA برای ارسال خودکار ایمیل در صورت نزدیک شدن موعد مقرر هر پروژه استفاده می کنیم. این چیزی شبیه به یادآوری است. برای نشان دادن این مثال از مجموعه داده زیر استفاده می کنیم. مجموعه داده شامل ایمیلهای فروشندگان مختلف، پیامها و تاریخ سررسید پروژه آنهاست.
برای انجام این روش مراحل زیر را دنبال کنید.
STEPS:
- ابتدا، روی برگه Date کلیک راست کنید.
- بعد، گزینه " مشاهده کد را انتخاب کنید. '.
- پنجره کد VBA خالی را برای کاربرگ فعال باز می کند. همچنین میتوانیم Alt + F11 را فشار دهیم تا آن پنجره کد را دریافت کنیم.
- سپس، کد زیر را در آن پنجره کد وارد کنید:
8790
" aMailBody = "" aMailBody = aMailBody & "سلام" & zRgSendVal & CrLf aMailBody = aMailBody & "پیام: " & aRgText.Offset(j - 1).Value &MailBodyL aMailBody & "" تنظیم aMailItem = aOutApp.CreateItem(0) با aMailItem .Subject = aMailSubject .To = zRgSendVal .HTMLBody = aMailBody .نمایش پایان با Set aMailItem = Nothing End If EndingA Sub8>
- جدیدکادر گفتگو ظاهر می شود.
- بعد از آن، در قسمت ورودی آن کادر گفتگو، محدوده ستون سررسید D$5:$D$9 را انتخاب کنید. سپس، روی OK کلیک کنید.
- یک کادر گفتگوی دیگر ظاهر می شود.
- به علاوه، در در قسمت ورودی، محدوده ستون B$5:$B$9 را که حاوی آدرسهای ایمیل است انتخاب کنید و روی OK کلیک کنید.
- علاوه بر این، یک پنجره دیگر ظاهر می شود. محدوده پیام $C$5:$C$9 را در قسمت ورودی پنجره پاپ انتخاب کنید.
- در پایان ، می توانیم نتایجی مانند تصویر زیر را مشاهده کنیم. 3 ایمیل دریافت می کنیم که به طور خودکار در 3 پنجره های مختلف Outlook ایجاد می شوند. با این کار نامه ای برای دو آدرس ایمیل اول ایجاد نمی شود. زیرا تاریخ سررسید آن دو پروژه به پایان رسیده است.
بیشتر بخوانید: نحوه ارسال خودکار ایمیل از اکسل بر اساس تاریخ
خوانش های مشابه
- [حل شد]: اشتراک گذاری کتاب کار در اکسل نشان داده نمی شود (با مراحل آسان)
- نحوه ارسال ایمیل از فهرست اکسل (2 روش موثر)
- نحوه ارسال یک صفحه گسترده اکسل قابل ویرایش از طریق ایمیل (3 روش سریع)
- ماکرو برای ارسال ایمیل از اکسل (5 نمونه مناسب)
- ماکرو برای ارسال ایمیل از اکسل با بدنه (3 مورد مفید)
3. از ماکرو اکسل برای ارسال خودکار ایمیل با پیوست ها استفاده کنید
در مثال آخر، خواهیم دید که چگونه می توانیمیک ماکرو اکسل برای ارسال خودکار ایمیل با پیوست ها ایجاد کنید. فرض کنید در تصویر زیر یک پیوست داریم. ما می خواهیم این پیوست را از طریق یک ایمیل با استفاده از excel VBA macro ارسال کنیم. برای این کار به مسیر این فایل اکسل نیاز داریم. در اینجا مراحل برای آن وجود دارد:
- فایل " Attachment.xlsx " " را انتخاب کنید.
- روی گزینه " Copy Path<2" کلیک کنید>'.
- بنابراین، مسیر فایلی که دریافت می کنیم:
این مسیر را در کد ماکرو خود وارد می کنیم تا این فایل را از طریق ایمیل ارسال کنیم. برای انجام این کار مراحل زیر را دنبال کنید.
STEPS:
- ابتدا به برگه Developer بروید و گزینه <1 را انتخاب کنید>Visual Basic .
- پنجره جدیدی با نام " Project – VBAProject باز خواهد شد ".
- دوم، راست کلیک کنید روی نام برگه.
- سپس، Insert > Module را انتخاب کنید.
- دستور بالا یک فضای خالی باز می کند VBA
- سوم، کد زیر را در آن ماژول تایپ کنید:
9368
- سپس، کلید F5 را فشار دهید یا روی دکمه Run کلیک کنید تا کد اجرا شود.
- در نهایت، کد پیوست را به ایمیل های ارائه شده در کد ارسال می کند. کد ایمیل ها را توسط Outlook ارسال می کند. بنابراین، روی دکمه Allow کلیک کنید تا Outlook پیوست را به ایمیل های داده شده ارسال کند.
بیشتر بخوانید: نحوه درخواستماکرو برای ارسال ایمیل از اکسل با پیوست
نتیجه گیری
در پایان، این مقاله 3 نمونه هایی از استفاده از excel VBA ماکرو را نشان می دهد. ارسال ایمیل به صورت خودکار نمونه کارنامه ارائه شده در این مقاله را دانلود کنید تا مهارت های خود را مورد آزمایش قرار دهید. اگر سوالی دارید، لطفاً نظر خود را در کادر زیر بنویسید. تیم ما سعی می کند در اسرع وقت به پیام شما پاسخ دهد. منتظر راه حل های مبتکرانه Microsoft Excel در آینده باشید.