Макрас для адпраўкі электроннай пошты з Excel (5 прыдатных прыкладаў)

Hugh West

16-10-2023 Макрасы & Excel VBA
  • Падзяліцца Гэтым
Hugh West

У гэтым артыкуле мы пакажам вам 5 Макрас для адпраўкі электроннай пошты з Excel . Каб прадэманстраваць нашы метады, мы выбралі набор даных з 3 слупкамі : « Імя », « Электронная пошта » і « Горад ”.

Спампаваць практычны сшытак

Выкарыстанне макраса для адпраўкі Email.xlsm

5 спосабаў выкарыстоўваць макрас для адпраўкі электроннай пошты з Excel

1. Выкарыстанне бібліятэкі аб'ектаў Outlook для адпраўкі электроннай пошты

Для першага макраса мы збіраемся ўключыць “ Microsoft Outlook 16.0 Object Library », каб адправіць электронны ліст з Excel . Акрамя таго, нам трэба ўвайсці ў наш уліковы запіс Outlook у Excel .

Крокі:

На пачатку, мы адкрыем акно Visual Basic .

  • Па-першае, з укладкі Распрацоўшчык >>> абярыце Visual Basic .

Або вы можаце націснуць ALT + F11 , каб адлюстраваць акно VBA .

  • Па-другое, з Інструменты >>> абярыце “ Спіс літаратуры… ”.

З'явіцца новае дыялогавае акно .

  • Па-трэцяе, абярыце « Бібліятэка аб'ектаў Microsoft Outlook 16.0 » і націсніце ОК .

Такім чынам, мы ўключым Бібліятэку аб'ектаў Outlook .

  • Іх з Уставіць >>> абярыце Модуль .

Мы ўвядзем тут наш код.

  • Пасля гэтага ўвядзіце наступнаекод. 
3945

Разбіўка кода VBA

  • Па-першае, мы выклікае нашу падпрацэдуру Macro_Send_Email .
  • Па-другое, мы аб'яўляем зменныя тыпы.
  • Па-трэцяе, мы' паўторна выбіраем Outlook у якасці нашага паштовага прыкладання .
  • Затым мы выбіраем наш адрас электроннай пошты адпраўкі з ячэйкі C5 .
  • Пасля гэтага змесціва электроннай пошты усталёўваецца ў нашым кодзе.
  • Нарэшце, « Уласцівасць адлюстравання VBA » выкарыстоўваецца тут для адлюстравання наша электронная пошта . Такім чынам, нам трэба будзе націснуць Адправіць уручную, каб адправіць электронныя лісты . Акрамя таго, мы можам выкарыстоўваць « Адправіць уласцівасць », каб адпраўляць электронныя лісты без адлюстравання.
  • Пасля гэтага Захаваць і зачыніце Модуль .

Цяпер мы запусцім код.

  • Па-першае, з Распрацоўшчык укладка >>> абярыце Макрасы .

З'явіцца дыялогавае акно Макрасы .

  • Па-другое , абярыце нашу падпрацэдуру “ Macro_Send_Email ”.
  • Нарэшце націсніце Выканаць .

Пасля выканання кода мы ўбачым акно электроннай пошты . Мы можам націснуць на Адправіць . Такім чынам, мы паказалі вам першы спосаб адпраўкі электроннага ліста з excel з дапамогай VBA .

Дадатковая інфармацыя: Адпраўка электроннай пошты з Excel VBA без Outlook (4 прыдатныя прыклады)

2. Макрас для адпраўкі электроннай пошты з уліковага запісу Gmailу Excel

Для гэтага метаду нам патрэбны менш бяспечны доступ да прыкладанняў з уліковага запісу Gmail . Акрамя таго, нам трэба будзе ўключыць Microsoft CDO з меню Даведкі .

Крокі:

  • Па-першае, як паказана ў першым спосабе , адкрыйце дыялогавае акно спасылак .
  • Па-другое, выберыце « Microsoft CDO для Windows 2000 Library ” і націсніце ОК .

  • Па-трэцяе, перайдзіце да Бяспека са свайго ўліковага запісу Google налады .
  • Нарэшце, уключыце Менш бяспечны доступ прыкладанняў .

Цяпер мы ўвядзем наш Макрас код.

  • Па-першае, як паказана ў метадзе 1 , адкрыйце акно Модуль і ўвядзіце гэты код. 
3389

Разбіўка кода VBA

  • Па-першае, мы выклікаем наш Падпрацэдура Send_Gmail_Macro .
  • Па-другое, мы аб'яўляем зменныя тыпы.
  • Па-трэцяе, мы ўсталёўваем адправіць па электроннай пошце змесціва ў нашым кодзе.
  • Затым мы прадстаўляем нашы ўліковыя дадзеныя для ўваходу . Вам трэба ўвесці свой уласны ID і Пароль тут.
  • Пасля гэтага мы выставілі порт на 465 .
  • Нарэшце, мы дасылаем наш электронны ліст .
  • Затым Захаваць і Запусціце гэты код.

Мы паспяхова даслалі электронны ліст на наш адрас.

Дадатковая інфармацыя: Макрас для адпраўкі электроннай пошты з Excel з тэкстам (3Карысныя выпадкі)

3. Адправіць электронны ліст у спіс атрымальнікаў са слупка

Для трэцяга спосабу мы збіраемся адправіць электронны ліст на 7 чалавек выкарыстоўваюць Macro з Excel . Мы знойдзем апошні радок нашага набору даных, таму наш код будзе працаваць для больш доўгага спісу. Мы будзем адпраўляць электронныя лісты з дыяпазону ячэйкі C5:C10 .

Крокі:

  • Па-першае, як паказана ў метадзе 1 , адкрыйце акно Модуль і ўвядзіце гэты код. 
5474

Разбіўка кода VBA

  • Па-першае, мы выклікаем нашу падпрацэдуру Macro_Send_Email_From_A_List .
  • Па-другое, мы аб'яўляем зменныя тыпы.
  • Па-трэцяе, мы выбіраем Outlook у якасці нашай пошты Прыкладанне .
  • Затым мы знаходзім апошні радок , які складае 10 для нашага набору даных.
  • Пасля гэтага, як наша электронная пошта пачынаецца з радка 5 мы ўвялі 5 у якасці пачатковага значэння для “ пераменнай z ” . Акрамя таго, нашы электронныя лісты знаходзяцца ў слупку C , таму мы ўвялі 3 ва ўласцівасць Cells .
  • Потым мы ўсталёўваем змест электроннай пошты ў нашым кодзе.
  • Нарэшце, « .Display » выкарыстоўваецца тут для адлюстравання нашай электроннай пошты . Такім чынам, нам трэба будзе націснуць Адправіць уручную, каб адправіць электронныя лісты . Акрамя таго, мы можам выкарыстоўваць « .Send », каб адправіць электронную пошту без адлюстравання.
  • Тады, Захавайце і запусціце модуль .

Мы бачым, што ўсе нашы электронныя лісты адлюстроўваюцца ў BCC . У заключэнне, мы можам проста націснуць Адправіць , каб выканаць нашу задачу.

Дадатковая інфармацыя: Як адправіць электронную пошту са спісу Excel (2 эфектыўныя спосабы)

Падобныя паказанні

  • Як аўтаматычна адпраўляць электронны ліст пры выкананні ўмовы ў Excel
  • Як абагуліць файл Excel у інтэрнэце (2 простыя метады)
  • Аўтаматычна адправіць электронны ліст з напамінам з аркуша Excel з дапамогай VBA
  • Як адправіць электронную пошту пры выкананні ўмоў у Excel (3 простыя метады)
  • Як уключыць абагульванне рабочай кнігі ў Excel

4 Макрас для адпраўкі аднаго аркуша па электроннай пошце

У гэтым раздзеле мы дашлем Актыўны аркуш нашай мэтавай асобе. Тут нам трэба будзе выбраць месцазнаходжанне нашага файла Excel .

Крокі:

  • Па-першае, як паказана ў метадзе 1 , адкрыйце акно Модуль і ўвядзіце гэты код. 
9435

Разбіўка кода VBA

  • Па-першае, мы выклікаем нашу падпрацэдуру Macro_Email_Single_Sheet .
  • Па-другое, мы аб'яўляем зменныя тыпы.
  • Па-трэцяе, мы капіюем актыўны аркуш і захоўваем яго як асобны Працоўны сшытак .
  • Пасля гэтага мы выбіраем Outlook у якасці паштовага прыкладання .
  • Затым мы наладжваемЗмест электроннай пошты ў нашым кодзе.
  • Пасля гэтага мы далучылі Аркуш да электроннай пошты .
  • Нарэшце , выкарыстоўвайце “ .Display ” для адлюстравання нашага электроннага ліста . Такім чынам, нам трэба будзе націснуць Адправіць уручную, каб адправіць электронныя лісты . Акрамя таго, мы можам выкарыстоўваць « .Адправіць », каб адправіць электронную пошту без адлюстравання.
  • Затым Захаваць і Запусціце модуль .

У акне мы ўбачым імя Ліста . Націсніце Адправіць , каб выканаць задачу.

Мы можам адкрыць файл і праверыць, што наш код працуе.

Дадатковая інфармацыя: Як адправіць электронную табліцу Excel, якую можна рэдагаваць, па электроннай пошце (3 хуткіх метаду)

5. Макрас у Адправіць ліст на аснове значэння ячэйкі

Для апошняга метаду мы крыху змянілі наш набор даных. Мы дадалі « Плацеж Плацеж » слупок у набор даных. Тут мы вышлем электронны ліст , які змяшчае горад « Абама ». Мы выразна бачым, што радок 5 утрымлівае яго, таму мы збіраемся адправіць электронны ліст толькі гэтаму чалавеку.

Крокі:

  • Спачатку, як паказана ў метадзе 1 , адкрыйце акно Модуль і ўвядзіце гэты код. 
6655

Разбіўка кода VBA

  • Па-першае, мы паўторна выклікаем нашу першую падпрацэдуру Send_Email_Condition .
  • Па-другое, мы аб'яўляем тыпы і налады зменнай “ Умовы ” як наш Аркуш .
  • Па-трэцяе, знойдзены апошні нумар радка . Больш за тое, наша значэнне пачынаецца з радка 5 , таму мы змясцілі радок 5 да апошняга радка ў нашым кодзе.
  • Тады, выклічце нашу другую падпрацэдуру Send_Email_With_Multiple_Condition .
  • Пасля гэтага мы выбіраем Outlook у якасці паштовага прыкладання .
  • Затым змесціва электроннай пошты задаецца ў нашым кодзе.
  • Тут мы далучаем файл Excel з электроннай поштай з дапамогай метаду Укладанне .
  • Пасля гэтага тут выкарыстоўваецца « .Display » для адлюстравання нашага электроннага ліста . Такім чынам, нам трэба будзе націснуць Адправіць уручную, каб адправіць электронныя лісты . Акрамя таго, мы можам выкарыстоўваць « .Адправіць », каб адправіць электронную пошту без адлюстравання.
  • Затым Захаваць і Запусціце модуль .

У заключэнне мы паказалі вам яшчэ адзін метад адпраўкі электронны ліст з дапамогай макраса VBA з Excel .

Дадатковая інфармацыя: Аўтаматычная адпраўка электронных лістоў з Excel на аснове змесціва ячэйкі (2 метады)

Практычны раздзел

Мы дадалі наборы практычных даных для кожнага метаду ў Excel file.

Выснова

Мы паказалі вам 5 метадаў выкарыстання Macro для адправіць ліст з Excel . Дзякуй за прачытанне, працягвайце выдатныя вынікі!

Папярэдняя публікацыя Як выдаліць апошнюю лічбу ў Excel (6 хуткіх метадаў)
Наступны пост Як ачысціць вобласць друку ў Excel (2 простых спосабу)

Х'ю Уэст з'яўляецца вельмі дасведчаным трэнерам і аналітыкам Excel з больш чым 10-гадовым вопытам работы ў галіны. Ён мае ступень бакалаўра ў галіне бухгалтарскага ўліку і фінансаў і ступень магістра дзелавога адміністравання. Х'ю захапляецца навучаннем і распрацаваў унікальны падыход да навучання, які лёгка прытрымлівацца і зразумець. Яго экспертныя веды Excel дапамаглі тысячам студэнтаў і спецыялістаў па ўсім свеце палепшыць свае навыкі і атрымаць поспех у сваёй кар'еры. Праз свой блог Х'ю дзеліцца сваімі ведамі з усім светам, прапаноўваючы бясплатныя падручнікі па Excel і онлайн-трэнінгі, каб дапамагчы прыватным асобам і прадпрыемствам цалкам раскрыць свой патэнцыял.