Այս հոդվածում մենք ձեզ ցույց կտանք 5 Մակրո նամակ ուղարկելու Excel -ից: Մեր մեթոդները ցուցադրելու համար մենք ընտրել ենք տվյալների բազա՝ 3 սյունակով ՝ « Անուն », « Էլ.փոստ » և « Քաղաք »: ».

Ներբեռնեք պրակտիկայի աշխատանքային գիրքը

5 եղանակ Excel-ից էլփոստ ուղարկելու համար մակրո օգտագործելու համար

1. Օգտագործեք Outlook Object Library-ը էլփոստ ուղարկելու համար

Առաջին Մակրո -ի համար մենք միացնելու ենք « 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 .

• Նրանք Տեղադրել >>> ընտրեք Մոդուլ ։

Մենք կմուտքագրենք մեր կոդը այստեղ։

• Դրանից հետո մուտքագրեք հետևյալը։կոդը:

2255

VBA կոդի բաշխում

• Նախ, մենք զանգահարելով մեր Ենթակարգը Macro_Send_Email :
• Երկրորդը, մենք հայտարարում ենք փոփոխական տեսակները:
• Երրորդ, մենք. կրկին ընտրելով Outlook որպես մեր Փոստի հավելված :
• Այնուհետև մենք ընտրում ենք մեր էլ․ հասցեն ուղարկող հասցեն C5 բջիջից<2։>.
• Դրանից հետո էլ․ փոստի բովանդակությունը դրվում է մեր կոդում։
• Վերջապես, այստեղ ցուցադրվելու համար օգտագործվում է « VBA Display Property »։ մեր էլփոստը : Հետևաբար, մենք պետք է սեղմենք Ուղարկել ձեռքով, որպեսզի ուղարկեք էլ-նամակները : Ավելին, մենք կարող ենք օգտագործել « Send Property »՝ էլ-նամակներ ուղարկելու առանց ցուցադրելու:

• Դրանից հետո Պահել և փակեք Մոդուլը :

Այժմ մենք Գործարկենք կոդը:

• Սկզբում -ից Մշակողի ներդիր >>> ընտրեք Մակրոներ ։

Կհայտնվի Մակրո երկխոսության տուփը ։

• Երկրորդը , ընտրեք մեր Ենթակարգը « Macro_Send_Email »:
• Վերջապես սեղմեք Գործարկել :

Կոդը գործարկելուց հետո մենք կտեսնենք էլփոստի պատուհանը: Մենք կարող ենք սեղմել Ուղարկել : Այսպիսով, մենք ձեզ ցույց տվեցինք էլ․ նամակ ուղարկելու առաջին մեթոդը excel-ից օգտագործելով VBA ։

Կարդալ ավելին. Email ուղարկել Excel VBA-ից առանց Outlook-ի (4 հարմար օրինակ)

2. Gmail հաշվից էլփոստ ուղարկելու մակրոExcel-ում

Այս մեթոդի համար մեզ անհրաժեշտ է ավելի քիչ ապահով հավելվածի հասանելիություն Gmail հաշվից: Բացի այդ, մենք պետք է միացնենք Microsoft CDO Հղումներ մենյուից:

Քայլեր.

• Նախ, ինչպես ցույց է տրված առաջին մեթոդում , բացեք Հղումներ երկխոսության տուփը :
• Երկրորդում ընտրեք « Microsoft CDO Windows 2000 գրադարանի համար » և սեղմեք OK :

• Երրորդ, ձեր Google հաշվից անցեք Անվտանգություն կարգավորումներ ։
• Վերջապես միացրեք Ավելի քիչ անվտանգ հավելվածի հասանելիությունը ։

Այժմ մենք մուտքագրում ենք մեր Մակրո կոդը։

• Նախ, ինչպես ցույց է տրված մեթոդ 1 , բացեք Module պատուհանը և մուտքագրեք այս կոդը։

1166

VBA կոդի բաշխում

• Նախ, մենք զանգահարում ենք մեր Ենթակարգը Send_Gmail_Macro :
• Երկրորդը, մենք հայտարարում ենք փոփոխական տեսակները:
• Երրորդ, մենք սահմանում ենք էլփոստի բովանդակությունը մեր կոդի մեջ:
• Այնուհետև մենք տրամադրում ենք մեր մուտքի հավատարմագրերը : Դուք պետք է մուտքագրեք ձեր սեփական ID և Գաղտնաբառը այստեղ:
• Դրանից հետո մենք տեղափոխեցինք պորտ դեպի 465 .
• Վերջապես, մենք ուղարկում ենք մեր էլփոստը ։

• Այնուհետև, Պահպանել և Գործարկեք այս կոդը:

Մենք հաջողությամբ ուղարկեցինք էլ․ նամակ մեր հասցեին։

Կարդալ ավելին․ մակրո՝ Excel-ից Body-ով էլ. նամակ ուղարկելու համար (3Օգտակար դեպքեր)

3. Ուղարկեք էլ. 1>7 մարդիկ, ովքեր օգտագործում են Մակրո Excel -ից: Մենք կգտնենք մեր տվյալների բազայի վերջին տողը , հետևաբար մեր կոդը կաշխատի ավելի երկար ցուցակի համար: Մենք նամակներ կուղարկենք C5:C10 բջջի տիրույթից:

Քայլեր.

• Նախ, ինչպես ցույց է տրված մեթոդ 1-ում , բացեք Module պատուհանը և մուտքագրեք այս կոդը:

8695

VBA կոդի բաշխում

• Սկզբում մենք զանգահարում ենք մեր Ենթակարգը Macro_Send_Email_From_A_List .
• Երկրորդը, մենք հայտարարում ենք փոփոխական տեսակները:
• Երրորդ, մենք ընտրում ենք Outlook որպես մեր Փոստ: Դիմում ։
• Այնուհետև մենք գտնում ենք վերջին տողը , որը 10 է մեր տվյալների բազայի համար։
• Դրանից հետո, ինչպես մեր էլփոստը սկսվում է 5 տողից մենք մուտքագրել ենք 5 որպես « փոփոխական z » սկզբնական արժեք: . Ավելին, մեր էլփոստերը գտնվում են C սյունակում , հետևաբար մենք մուտքագրել ենք 3 Cells հատկության ներսում:
• Այնուհետև մենք սահմանում ենք էլփոստի բովանդակությունը մեր կոդի մեջ:
• Վերջապես, « .Display »-ն այստեղ օգտագործվում է մեր էլփոստը<2 ցուցադրելու համար:>. Հետևաբար, մենք պետք է սեղմենք Ուղարկել ձեռքով, որպեսզի ուղարկեք էլ-նամակները : Ավելին, մենք կարող ենք օգտագործել « . Ուղարկել »՝ ուղարկել էլփոստի առանց ցուցադրելու:

• Այնուհետև, Պահեք և Գործարկեք Մոդուլը ։

Մենք կարող ենք տեսնել, որ մեր բոլոր էլ․ նամակները ցուցադրվում են BCC . Եզրափակելով, մենք կարող ենք պարզապես սեղմել Ուղարկել մեր առաջադրանքն ավարտելու համար:

Կարդալ ավելին. Ինչպես ուղարկել էլ. Excel ցանկից (2 արդյունավետ եղանակ)

Նման ընթերցումներ

• Ինչպես ինքնաբերաբար էլփոստ ուղարկել, երբ պայմանը համապատասխանում է Excel-ում
• Ինչպես համօգտագործել Excel ֆայլը առցանց (2 հեշտ մեթոդ)
• Հիշեցման նամակ ուղարկել ավտոմատ կերպով Excel-ի աշխատաթերթից VBA-ի միջոցով
• Ինչպես ուղարկել էլփոստ, եթե պայմանները բավարարված են Excel-ում (3 հեշտ մեթոդ)
• Ինչպես միացնել Share Workbook-ը Excel-ում

4 Էլեկտրոնային փոստի միջոցով մեկ թերթ ուղարկելու մակրո

Այս բաժնում մենք կուղարկենք Ակտիվ աշխատանքային թերթիկը մեր թիրախային անձին: Այստեղ մենք պետք է ընտրենք մեր Excel ֆայլի գտնվելու վայրը:

Քայլեր.

• Նախ, ինչպես ցույց է տրված մեթոդ 1-ում , բացեք Module պատուհանը և մուտքագրեք այս կոդը:

2517

VBA կոդի բաշխում

• Սկզբում մենք կանչում ենք մեր Ենթակարգը Macro_Email_Single_Sheet :
• Երկրորդը, մենք հայտարարում ենք փոփոխականի տեսակները:
• Երրորդը, մենք պատճենում ենք Ակտիվ թերթիկը և պահում այն ​​որպես առանձին Աշխատանքային գրքույկ :
• Դրանից հետո մենք ընտրում ենք Outlook որպես մեր Փոստի հավելված :
• Այնուհետև մենք կարգավորում ենք էլեկտրոնային փոստի բովանդակությունը մեր կոդի մեջ:
• Դրանից հետո մենք կցեցինք Թերթիկը էլփոստին :
• Վերջապես , օգտագործեք « .Ցուցադրել »՝ մեր էլփոստը ցուցադրելու համար: Հետևաբար, մենք պետք է սեղմենք Ուղարկել ձեռքով, որպեսզի ուղարկեք էլ-նամակները : Ավելին, մենք կարող ենք օգտագործել « . Ուղարկել »՝ ուղարկելու էլ. 1>Գործարկեք Մոդուլը :

Պատուհանում կտեսնենք Թերթի անունը: Սեղմեք Ուղարկել առաջադրանքն ավարտելու համար:

Մենք կարող ենք բացել ֆայլը և հաստատել, որ մեր կոդը աշխատում է:

0>

Կարդալ ավելին. Ինչպես ուղարկել խմբագրվող Excel աղյուսակը էլփոստով (3 արագ մեթոդ)

5. Մակրո դեպի Ուղարկել էլ․ նամակ՝ հիմնվելով բջջային արժեքի վրա

Վերջին մեթոդի համար մենք մի փոքր փոխել ենք մեր տվյալների բազան։ Մենք ավելացրել ենք « Վճարում Պարտք » սյունակը տվյալների հավաքածուին: Այստեղ մենք կուղարկենք էլ․ նամակ որը պարունակում է « Օբամա » քաղաքը։ Մենք հստակ տեսնում ենք, որ 5-րդ շարքը պարունակում է այն, հետևաբար մենք ուղարկելու ենք էլ․ նամակ միայն այդ անձին։

Քայլեր.

• Նախ, ինչպես ցույց է տրված մեթոդ 1 , բացեք Module պատուհանը և մուտքագրեք այս կոդը:

9821

VBA կոդի բաշխում

• Նախ, մենք կրկին զանգահարեք մեր առաջին Ենթակարգը Send_Email_Condition :
• Երկրորդ, մենք հայտարարում ենք Փոփոխական տեսակները և կարգավորումները« Պայմաններ »-ը որպես մեր Թերթիկը :
• Երրորդ, վերջին տողի համարը գտնվել է: Ավելին, մեր արժեքը սկսվում է տող 5 -ից, հետևաբար մենք դրել ենք տող 5 վերջին տող մեր կոդի մեջ։
• Այնուհետև, զանգահարեք մեր երկրորդ Ենթակարգը Send_Email_With_Multiple_Condition :
• Դրանից հետո մենք ընտրում ենք Outlook որպես մեր Mail Application :
• Այնուհետև, էլփոստի բովանդակությունը դրված է մեր կոդում:
• Այստեղ մենք կցում ենք Excel ֆայլը էլ․ օգտագործելով Հավելված մեթոդը:
• Դրանից հետո « .Display »-ն օգտագործվում է այստեղ՝ մեր էլ.փոստը ցուցադրելու համար: Հետևաբար, մենք պետք է սեղմենք Ուղարկել ձեռքով, որպեսզի ուղարկեք էլ-նամակները : Ավելին, մենք կարող ենք օգտագործել « . Ուղարկել »՝ ուղարկելու էլ. 1>Գործարկեք Մոդուլը :

Եզրափակելով՝ մենք ձեզ ցույց տվեցինք ուղարկելու ևս մեկ եղանակ 2>էլ․ նամակ օգտագործելով VBA Macro Excel -ից։

Կարդալ ավելին. Ավտոմատ կերպով նամակներ ուղարկել Excel-ից՝ հիմնվելով բջջային բովանդակության վրա (2 մեթոդ)

Պրակտիկայի բաժին

Մենք ավելացրել ենք պրակտիկայի տվյալների հավաքածուներ յուրաքանչյուր մեթոդի համար Excel-ում ֆայլ:

Եզրակացություն

Մենք ձեզ ցույց ենք տվել 5 մեթոդներ օգտագործելու Մակրո ուղարկեք է նամակ Excel -ից: Շնորհակալություն կարդալու համար, շարունակե՛ք գերազանցել: