Excel бағдарламасынан электрондық поштаны жіберуге арналған макрос (5 ​​қолайлы мысал)

Hugh West

16-10-2023 Макростар & Excel VBA
  • Мұны Бөлісіңіз
Hugh West

Бұл мақалада біз сізге 5 Макро Excel бағдарламасынан электрондық поштаны жіберу үшін көрсетеміз. Әдістерімізді көрсету үшін біз 3 баған бар деректер жинағын таңдадық: “ Аты ”, “ Электрондық пошта ” және “ Қала ”.

Тәжірибелік жұмыс кітабын жүктеп алу

Email.xlsm жіберу үшін макросты пайдалану

5 әдіс Excel бағдарламасынан электрондық поштаны жіберу үшін макросты пайдалану

1. Электрондық поштаны жіберу үшін Outlook нысандары кітапханасын пайдалану

Бірінші Макро үшін біз «<1» мүмкіндігін қосамыз>Microsoft Outlook 16.0 нысандар кітапханасы ” Excel ішінен электрондық пошта жіберу. Сонымен қатар, біз Excel бағдарламасындағы Outlook есептік жазбамызға кіруіміз керек.

Қадамдар:

Басында, біз Visual Basic терезесін ашамыз.

  • Біріншіден, Әзірлеуші ​​ қойындысынан >>> Visual Basic таңдаңыз.

Балама, VBA терезесін көрсету үшін ALT + F11 пернелерін басуға болады.

  • Екіншіден, Құралдар >> “ Сілтемелер... ” таңдаңыз.

Жаңа диалогтық терезе пайда болады.

  • Үшіншіден, “ Microsoft Outlook 16.0 нысандар кітапханасы ” тармағын таңдап, OK түймесін басыңыз.

Осылайша, біз Outlook нысандар кітапханасын қосамыз. .

  • Олар Кірістіру >> Модуль тармағын таңдаңыз.

Біз кодты осында тереміз.

  • Одан кейін келесіні теріңізкод. 
1122

VBA кодының бөлінуі

  • Біріншіден, біз Қосымша процедурамызды Macro_Send_Email деп атаймыз.
  • Екіншіден, біз айнымалы түрлерін жариялаймыз.
  • Үшіншіден, біз' Outlook Пошта қолданбасы ретінде қайта таңдаймыз.
  • Содан кейін электрондық пошта жіберу мекенжайын C5<2 ұяшығынан таңдаймыз>.
  • Осыдан кейін, электрондық пошта мазмұны біздің кодта орнатылады.
  • Соңында, мұнда көрсету үшін “ VBA дисплей қасиеті ” пайдаланылады. біздің электрондық поштамыз . Сондықтан, электрондық хаттарды жіберу үшін Жіберу қолмен басу керек. Сонымен қатар, біз электрондық хаттарды жіберу үшін Сипатты жіберу » функциясын пайдалана аламыз.
  • Одан кейін Сақтау және Модуль жабыңыз.

Енді біз кодты Іске қосу жасаймыз.

  • Біріншіден, Әзірлеуші ​​ қойындысы >>> Макростар таңдаңыз.

Макрос диалогтық терезесі пайда болады.

  • Екіншіден , Қосымша процедурамызды “ Macro_Send_Email ” таңдаңыз.
  • Соңында, Орындау түймесін басыңыз.

Кодты орындағаннан кейін біз электрондық пошта терезесін көреміз. Біз Жіберу түймесін басамыз. Осылайша, біз сізге VBA көмегімен excel ден электрондық пошта жіберудің бірінші әдісін көрсеттік.

Толығырақ оқу: Excel VBA бағдарламасынан Outlook қолданбай электрондық поштаны жіберу (4 қолайлы мысал)

2. Gmail тіркелгісінен электрондық поштаны жіберуге арналған макросExcel бағдарламасында

Бұл әдіс үшін бізге Gmail есептік жазбасынан қауіпсіз қолданбаға кіру қажет. Оған қоса, Сілтемелер мәзірінен Microsoft CDO қосуымыз керек.

Қадамдар:

  • Біріншіден, бірінші әдісте көрсетілгендей , Сілтемелер диалогтық терезесі ашыңыз.
  • Екіншіден, « Microsoft CDO for Windows 2000 Library таңдаңыз. ” түймесін басып, OK түймесін басыңыз.

  • Үшіншіден, Google есептік жазбаңыздан Қауіпсіздік бөліміне өтіңіз. параметрлер .
  • Соңында, Қауіпсіз қолданбаға кіру мүмкіндігін қосыңыз .

Енді енгіземіз біздің макрос код.

  • Біріншіден, 1 әдісте көрсетілгендей, Модуль терезесін шығарып, осы кодты теріңіз. 
3593

VBA кодының бөлінуі

  • Біріншіден, біз Қосымша процедура Send_Gmail_Macro .
  • Екіншіден, біз айнымалы түрлерін жариялап жатырмыз.
  • Үшіншіден, біз электрондық пошта мазмұн біздің кодта.
  • Содан кейін біз логин тіркелгі деректерін береміз. Өзіңіздің ID және Құпия сөзді осы жерге теруіңіз керек.
  • Осыдан кейін біз порт 465<күйіне орнаттық. 2>.
  • Соңында, біз электрондық поштамыз жібереміз.
  • Содан кейін Сақтау және осы кодты іске қосыңыз.

Мекен-жайымызға сәтті электрондық пошта жібердік.

Толығырақ оқу: Excel бағдарламасынан электрондық поштаны негізгі мәтінмен жіберуге арналған макро (3)Пайдалы жағдайлар)

3. Электрондық хатты бағандағы алушылар тізіміне жіберу

Үшінші әдіс үшін біз электрондық хаттарды оған <жібереміз. 1>7 адам Макросты Excel бағдарламасынан пайдаланады. Деректер жиынының соңғы жолын табамыз, сондықтан біздің код ұзағырақ тізім үшін жұмыс істейді. Біз электрондық хаттарды C5:C10 ұяшығынан жібереміз.

Қадамдар:

  • Біріншіден, 1 әдісте көрсетілгендей, Модуль терезесін шығарып, осы кодты теріңіз. 
5381

VBA кодының бөлінуі

  • Біріншіден, біз Қосымша процедурамызды Macro_Send_Email_From_A_List<деп атаймыз. 21>.
  • Екіншіден, біз айнымалы түрлерін жариялаймыз.
  • Үшіншіден, Пошта ретінде Outlook таңдаймыз. Қолданба .
  • Содан кейін біз деректер жинағы үшін 10 болатын соңғы жолды тауып жатырмыз.
  • Одан кейін, электрондық поштамыз 5-жолдан басталады, біз « айнымалы z » үшін бастапқы мән ретінде 5 енгіздік . Сонымен қатар, біздің электрондық пошталар C бағанында , сондықтан біз Ұяшықтар қасиетінің ішіне 3 енгіздік.
  • Сосын, кодымызда электрондық пошта мазмұнын орнатып жатырмыз.
  • Соңында, мұнда электрондық поштаны<2 көрсету үшін “ .Дисплей ” пайдаланылады>. Сондықтан, электрондық хаттарды жіберу үшін Жіберу қолмен басу керек. Сонымен қатар, біз « .Send » қолданбасын электрондық поштаны жіберу үшін көрсетпей пайдалана аламыз.
  • Одан кейін, Сақтау және Модуль -ді іске қосыңыз.

Біздің барлық электрондық пошталарымыз <ішінде көрсетілетінін көреміз. 1>BCC . Қорытындылай келе, тапсырмамызды орындау үшін Жіберу түймесін басуға болады.

Толығырақ оқу: Электрондық поштаны қалай жіберуге болады Excel тізімінен (2 тиімді жол)

Ұқсас оқулар

  • Excel бағдарламасында жағдай орындалғанда электрондық поштаны автоматты түрде жіберу жолы
  • Excel файлын онлайн бөлісу (2 оңай әдіс)
  • VBA көмегімен Excel жұмыс парағынан еске салғыш электрондық поштаны автоматты түрде жіберу
  • Excel бағдарламасында шарттар орындалса, электрондық поштаны қалай жіберуге болады (3 оңай әдіс)
  • Excel бағдарламасында жұмыс кітабын ортақ пайдалануды қосу

4 Электрондық пошта арқылы бір парақты жіберуге арналған макрос

Бұл бөлімде біз Белсенді жұмыс парағын мақсатты тұлғаға жібереміз. Мұнда біз Excel файлымыздың орнын таңдауымыз керек.

Қадамдар:

  • Біріншіден, 1 әдісте көрсетілгендей, Модуль терезесін шығарып, осы кодты теріңіз. 
4227

VBA кодын бөлу

  • Біріншіден, біз Ішкі процедурамызды Macro_Email_Single_sheet деп атаймыз.
  • Екіншіден, біз айнымалы түрлерін жариялап жатырмыз.
  • Үшіншіден, Белсенді парақты көшіреміз және оны бөлек <1 ретінде сақтаймыз>Жұмыс кітабы .
  • Одан кейін Пошта қолданбасы ретінде Outlook таңдаймыз.
  • Содан кейін біз электрондық пошта мазмұн біздің кодта.
  • Осыдан кейін біз парақты электрондық поштаға тіркедік.
  • Соңында , электрондық поштамызды көрсету үшін “ .Дисплей ” пайдаланыңыз. Сондықтан, электрондық хаттарды жіберу үшін Жіберу қолмен басу керек. Оған қоса, электрондық поштаны жіберу үшін « .Send » қолданбасын көрсетпей пайдалана аламыз.
  • Содан кейін Сақтау және Модуль -ді іске қосыңыз.

Терезеде парақ атын көреміз. Тапсырманы орындау үшін Жіберу түймесін басыңыз.

Біз Файлды ашып, кодымыздың жұмыс істеп тұрғанын тексере аламыз.

Толығырақ: Өңделетін Excel электрондық кестесін электрондық пошта арқылы жіберу жолы (3 жылдам әдіс)

5. Макрос Ұяшық мәніне негізделген электрондық поштаны жіберу

Соңғы әдіс үшін деректер жиынын аздап өзгерттік. Деректер жиынына « Төлем Төлем » баған қосылды. Мұнда біз « Обама » қаласын қамтитын электрондық пошта жібереміз. Біз оны 5-жолда қамтитынын анық көреміз, сондықтан біз электрондық пошта тек сол адамға ғана жібереміз.

Қадамдар:

  • Біріншіден, 1 әдісте көрсетілгендей, Модуль терезесін шығарып, теріңіз. бұл код. 
2384

VBA кодының бөлінуі

  • Біріншіден, біз' бірінші Қосымша процедурамызды Send_Email_шартын шақырамыз.
  • Екіншіден, біз Айнымалы түрлері мен параметрін жариялаймыз« Шарттар » біздің парақ ретінде.
  • Үшіншіден, соңғы жол саны табылды. Сонымен қатар, біздің мәніміз 5-жолдан басталады, сондықтан кодымызда 5-жолды соңғы жолды қойдық.
  • Сосын, екінші Қосымша процедурамызға Электрондық поштаны_Бірнеше_шартпен_жіберу деп атаңыз.
  • Осыдан кейін Пошта қолданбасы ретінде Outlook таңдаймыз.
  • Содан кейін электрондық пошта мазмұны біздің кодта орнатылады.
  • Мұнда біз Excel файлын электрондық поштамен тіркеп жатырмыз. Тіркеме әдісі арқылы.
  • Одан кейін біздің электрондық поштаны көрсету үшін “ .Дисплей ” пайдаланылады. Сондықтан, электрондық хаттарды жіберу үшін Жіберу қолмен басу керек. Оған қоса, электрондық поштаны жіберу үшін « .Send » қолданбасын көрсетпей пайдалана аламыз.
  • Содан кейін Сақтау және Модуль іске қосыңыз.

Соңында, біз сізге жіберудің тағы бір әдісін көрсеттік. 2> Excel ішінен VBA макрос қолданылатын электрондық пошта .

Толығырақ: Ұяшық мазмұнына негізделген Excel бағдарламасынан электрондық хаттарды автоматты түрде жіберу (2 әдіс)

Жаттығу бөлімі

Біз Excel бағдарламасындағы әрбір әдіс үшін тәжірибе деректер жиынын қостық. файл.

Қорытынды

Біз сізге 5 Макросты пайдаланудың әдісін көрсеттік. Excel ішінен ан электрондық пошта жіберіңіз. Оқығаныңыз үшін рақмет, алға ұмтылыңыз!

Алдыңғы пост Excel бағдарламасындағы соңғы санды қалай жоюға болады (6 жылдам әдіс)
Келесі пост Excel бағдарламасында басып шығару аймағын қалай тазартуға болады (2 оңай жол)

Хью Уэст – салада 10 жылдан астам тәжірибесі бар жоғары тәжірибелі Excel тренері және талдаушысы. «Бухгалтерлік есеп және қаржы» мамандығы бойынша бакалавр дәрежесі және іскерлік әкімшілендіру магистрі дәрежесі бар. Хью оқытуға құмар және ұстануға және түсінуге оңай бірегей оқыту әдісін әзірледі. Оның Excel бағдарламасындағы сараптамалық білімі бүкіл әлем бойынша мыңдаған студенттер мен мамандарға біліктіліктерін арттыруға және мансаптық жетістіктерге жетуге көмектесті. Блогы арқылы Хью өз білімін әлеммен бөліседі, жеке адамдар мен бизнеске толық әлеуетін ашуға көмектесу үшін тегін Excel оқулықтары мен онлайн тренингтерін ұсынады.