Excel макро за автоматско испраќање е-пошта (3 соодветни примери)

Hugh West

17-10-2023 Макроа & засилувач; Excel VBA
  • Споделете Го Ова
Hugh West

Овој туторијал ќе илустрира како да се користи ексел макро за автоматско испраќање е-пошта. Можеме да ја конфигурираме нашата функција за испраќање користејќи VBA макроа. Така, со помош на VBA макрото можеме да испратиме е-пошта до повеќе корисници истовремено. Мора да имаме инсталирано Outlook на нашиот уред за автоматски да испраќаме е-пошта со макро. Бидејќи кодот што ќе го вметнеме ќе користи Outlook за испраќање е-пошта до примателите.

Преземете ја работната книга за вежбање

Можете да ја преземете работната книга за вежбање од овде.

Испрати е-пошта Automatically.xlsm

3 Соодветни примери на Excel макро за автоматско испраќање е-пошта

Во текот на овој напис, ќе покажеме 3 соодветни примери за користење ексел макро за автоматско испраќање е-пошта до примателите. Пред да започнеме да го илустрираме примерот, треба да поправиме нешто во нашиот Excel лист. Завршете ги долунаведените чекори пред да примените макро за автоматско испраќање е-пошта.

ЧЕКОРИ:

  • Прво, од вашата база на податоци, одете во табот Програмери . Изберете ја опцијата Visual Basic .

  • Следно, одете во картичката Tool и изберете ја опцијата Референци .

  • Ќе се отвори ново поле за дијалог со име „ Референци – VBAProject “.
  • Конечно, проверете ја опцијата „ Microsoft Office 16.0 Object Library “ и кликнете на OK .

1. Примени Excel VBA макро за испраќањеЕ-пошта автоматски врз основа на вредноста на ќелијата

Прво и основно, ќе го примениме макрото excel VBA за да испратиме е-пошта автоматски врз основа на одредена вредност на ќелијата во нашата база на податоци. За да го илустрираме овој пример, ќе ја користиме следната база на податоци. Ќе напишеме код кој автоматски ќе испрати е-пошта ако вредноста на ќелијата во ќелијата D6 е поголема од 400 .

Ајде да ги видиме чекорите за извршување на оваа акција.

ЧЕКОРИ:

  • За почеток, десно – кликнете на листот „ Врз основа на ќелија “.
  • Покрај тоа, изберете ја опцијата „ Прегледај го кодот “.

  • Горната акција ќе отвори празен прозорец со VBA код за тој работен лист. Друг начин да се отвори тој прозорец со код е да притиснете Alt + F11 .
  • Понатаму, внесете го следниот код во тој прозорец со код: 
6155
  • Потоа, кликнете на копчето Изврши или притиснете го копчето F5 за да го вклучите кодот.

  • Ќе се појави ново поле за дијалог со име Macros .
  • Потоа, во полето Macro Name изберете го макрото „ send_mail_outlook '.
  • Сега кликнете на копчето Стартувај .

  • Конечно, од сега кога ќелијата вредност во ќелијата D6 > 400 е-пошта во Outlook ќе генерира автоматски со одредени примачи. Треба само да кликнете на копчето Испрати за да ја испратиме е-поштата.

ПрочитајтеПовеќе: Автоматско испраќање е-пошта од Excel врз основа на клеточна содржина (2 методи)

2. Автоматско испраќање е-пошта врз основа на датумот на доспевање со VBA макро

Во вториот метод, ќе го користиме макрото Excel VBA за да испратиме е-пошта автоматски ако рокот на доспевање на кој било проект е блиску. Ова е нешто како потсетник. За да го илустрираме овој пример, ја користиме следната база на податоци. Податокот содржи е-пошта на различни продавачи, пораки и датумот на доспевање на нивниот проект.

Следете ги чекорите подолу за да го извршите овој метод.

ЧЕКОРИ:

  • Прво, кликнете со десното копче на листот Датум .
  • Следно, изберете ја опцијата „ Прегледај код '.

  • Отвора празен VBA прозорец со код за активниот работен лист. Можеме да притиснеме и Alt + F11 за да го добиеме тој прозорец со код.
  • Потоа, вметнете го следниов код во тој прозорец со код: 
4745

" aMailBody = "" aMailBody = aMailBody & "Здраво" & zRgSendVal & CrLf aMailBody = aMailBody & "Порака: " & aRgText.Offset(j - 1).Вредност &MailBody aMailBody & "" Поставете aMailItem = aOutApp.CreateItem(0) со aMailItem .Subject = aMailSubject .To = zRgSendVal .HTMLBody = aMailBody .Display End With Set aMailItem = Nothing End If EndthApp>

  • Сега, користете го копчето Стартувај или копчето F5 за да го извршите кодот.

    • НовоЌе се појави полето за дијалог.
    • Потоа, во полето за внесување на тој дијалог прозорец изберете го опсегот на колоната за датум на доспевање D$5:$D$9 . Потоа, кликнете на OK .

    • Ќе се појави уште едно поле за дијалог.
    • Понатаму, во полето за внесување изберете го опсегот на колоните B$5:$B$9 што ги содржи адресите на е-пошта и кликнете на OK .

    • Покрај тоа, ќе се појави уште еден прозорец. Изберете го опсегот на пораки $C$5:$C$9 во полето за внесување на скокачкиот прозорец.

    • На крајот , можеме да видиме резултати како следнава слика. Добиваме 3 е-пораки кои автоматски се креираат во 3 различни прозорци на Outlook . Ова нема да создаде пошта за првите две адреси на е-пошта. Бидејќи рокот на доспевање на тие два проекти е завршен.

    Прочитајте повеќе: Како автоматски да испраќате е-пошта од Excel врз основа на Датум

    Слични читања

    • [Решено]: Споделете ја работната книга што не се прикажува во Excel (со лесни чекори)
    • Како да испратите е-пошта од листата на Excel (2 ефективни начини)
    • Како да испратите табела за уредување на Excel по е-пошта (3 брзи методи)
    • Макро за испраќање е-пошта од Excel (5 соодветни примери)
    • Макро за испраќање е-пошта од Excel со тело (3 корисни случаи)

    3. Користете Excel макро за автоматско испраќање е-пошта со прилози

    Во последниот пример, ќе видиме како можемеразвијте ексел макро за автоматско испраќање е-пошта со прилози. Да претпоставиме дека имаме прилог на следната слика. Сакаме да го испратиме овој прилог преку е-пошта користејќи excel VBA макро. За да го направите ова, ни треба патеката на оваа датотека Excel. Еве ги чекорите за тоа:

    • Изберете ја датотеката ' Attachment.xlsx ' '.
    • Кликнете на опцијата „ Копирај патека '.

    • Значи, патеката на датотеката што ја добиваме:
    E:\Exceldemy\Attachment.xlsx

    Ќе ја вметнеме оваа патека во нашиот макро код за да ја испратиме оваа датотека по е-пошта. Следете ги чекорите подолу за да го направите ова.

    ЧЕКОРИ:

    • Прво, одете во картичката Програмер и изберете ја опцијата Visual Basic .

    • Ќе се отвори нов прозорец со име „ Проект – VBAProject “.
    • Второ, кликнете со десното копче на името на листот.
    • Потоа, изберете Вметни > Модул .

    • Горната команда ќе отвори празно VBA
    • Трето, напишете го следниов код во тој модул: 
    9479
    • Потоа, притиснете го копчето F5 или кликнете на копчето Изврши за да го вклучите кодот.

    • На крај, кодот ќе го испрати прилогот до дадените е-пошта во кодот. Кодот испраќа е-пошта преку Outlook . Значи, кликнете на копчето Дозволи за да дозволите Outlook да го испрати прилогот на дадените е-пораки.

    Прочитајте повеќе: Како да аплициратеМакро за испраќање е-пошта од Excel со прилог

    Заклучок

    Како заклучок, овој напис покажува 3 примери за користење excel VBA макро на испраќајте пошта автоматски. Преземете го примерокот на работниот лист даден во оваа статија за да ги ставите на тест вашите вештини. Ако имате какви било прашања, ве молиме оставете коментар во полето подолу. Нашиот тим ќе се обиде да одговори на вашата порака што е можно поскоро. Внимавајте на поинвентивни Microsoft Excel решенија во иднина.

    Претходен пост Како да печатите етикети со баркод во Excel (со 4 ​​лесни чекори)
    Следен пост Excel COUNTIF со критериуми за поголеми и помали од

    Хју Вест е високо искусен тренер и аналитичар на Excel со повеќе од 10 години искуство во индустријата. Има диплома за сметководство и финансии и магистер по бизнис администрација. Хју има страст за предавање и има развиено уникатен пристап на наставата кој е лесен за следење и разбирање. Неговото стручно познавање на Excel им помогна на илјадници студенти и професионалци ширум светот да ги подобрат своите вештини и да се истакнат во нивните кариери. Преку својот блог, Хју го споделува своето знаење со светот, нудејќи бесплатни упатства за Excel и онлајн обука за да им помогне на поединците и бизнисите да го достигнат својот целосен потенцијал.