Macro Excel për të dërguar automatikisht email (3 shembuj të përshtatshëm)

Hugh West

17-10-2023 Makro & Excel VBA
  • Shperndaje Kete
Hugh West

Ky tutorial do të ilustrojë se si të përdorni makro excel për të dërguar automatikisht një email. Ne mund të konfigurojmë veçorinë tonë të postimit duke përdorur VBA makrot. Pra, duke përdorur makro VBA , mund t'u dërgojmë një email përdoruesve të shumtë në të njëjtën kohë. Duhet të kemi të instaluar Outlook në pajisjen tonë për të dërguar email automatikisht me një makro. Sepse kodi që do të fusim do të përdorë Outlook për të dërguar email te marrësit.

Shkarkoni Librin e Punës Praktike

Mund ta shkarkoni librin e punës praktike nga këtu.

Dërgo email automatikisht.xlsm

3 Shembuj të përshtatshëm të Excel Macro për të dërguar email automatikisht

Gjatë këtij artikulli, ne do të demonstrojmë 3 shembuj të përshtatshëm të përdorimit të makro excel për të dërguar automatikisht një email te marrësit. Para se të fillojmë të ilustrojmë shembullin, duhet të rregullojmë një gjë në fletën tonë excel. Plotësoni hapat e mëposhtëm përpara se të aplikoni makro për të dërguar email automatikisht.

HAPA:

  • Së pari, nga grupi juaj i të dhënave, shkoni te skeda Zhvilluesi . Zgjidhni opsionin Visual Basic .

  • Tjetra, shkoni te skeda Vegla dhe zgjidhni opsionin Referencat .

  • Do të hapet një kuti e re dialogu e quajtur ' Referencat – VBAProject '.
  • Më në fund, kontrolloni opsionin ' Microsoft Office 16.0 Object Library ' dhe klikoni në OK .

1. Aplikoni Excel VBA Macro për të dërguarEmail automatikisht bazuar në vlerën e qelisë

Së pari dhe më kryesorja, ne do të aplikojmë makro excel VBA për të dërguar një email automatikisht bazuar në një vlerë të caktuar qelize në grupin tonë të të dhënave. Për të ilustruar këtë shembull, ne do të përdorim të dhënat e mëposhtme. Ne do të shkruajmë një kod që do të dërgojë një email automatikisht nëse vlera e qelizës në qelizën D6 është më e madhe se 400 .

Le të shohim hapat për të kryer këtë veprim.

HAPA:

  • Për të filluar, djathtas – kliko në fletën " Bazuar në qelizën ".
  • Përveç kësaj, zgjidhni opsionin " Shiko kodin ".

  • Veprimi i mësipërm do të hapë një dritare të zbrazët të kodit VBA për atë fletë pune. Një mënyrë tjetër për të hapur atë dritare kodi është të shtypni Alt + F11 .
  • Për më tepër, shkruani kodin e mëposhtëm në atë dritare kodi: 
7257
  • Më pas, klikoni butonin Run ose shtypni tastin F5 për të ekzekutuar kodin.

  • Do të shfaqet një kuti e re dialogu e quajtur Macros .
  • Pas kësaj, në fushën Emri makro zgjidhni makro ' send_mail_outlook '.
  • Tani klikoni në butonin Run .

  • Më në fund, nga tani kur qeliza vlera në qelizën D6 > 400 një email në Outlook do të gjenerohet automatikisht me marrës të veçantë. Thjesht duhet të klikojmë në butonin Dërgo për të dërguar emailin.

LexoMë shumë: Dërgo automatikisht email nga Excel bazuar në përmbajtjen e celularit (2 metoda)

2. Dërgimi automatik i emaileve bazuar në datën e duhur me makro VBA

Në Metoda e dytë, ne do të përdorim makro Excel VBA për të dërguar një email automatikisht nëse data e përfundimit të ndonjë projekti është afër. Kjo është diçka si një kujtesë. Ne përdorim të dhënat e mëposhtme për të ilustruar këtë shembull. Grupi i të dhënave përmban email-e të shitësve të ndryshëm, mesazhe dhe datën e caktuar të projektit të tyre.

Ndiq hapat e mëposhtëm për të kryer këtë metodë.

HAPAT:

  • Së pari, kliko me të djathtën në fletën Data .
  • Më pas, zgjidh opsionin ' Shiko kodin '.

  • Hel një dritare të zbrazët të kodit VBA për fletën aktive të punës. Mund të shtypim gjithashtu Alt + F11 për të marrë atë dritare kodi.
  • Më pas, futni kodin e mëposhtëm në atë dritare kodi: 
4457

" aMailBody = "" aMailBody = aMailBody & "Përshëndetje " & zRgSendVal & CrLf aMailBody = aMailBody & "Mesazhi: " & aRgText.Offset(j - 1). Vlera &MailBody aMailBody & "" Set aMailItem = aOutApp.CreateItem(0) With aMailItem .Subject = aMailSubject .To = zRgSendVal .HTMLBody = aMailBody .Display Fund Me Set aMailItem = Asgjë Përfundon Nëse Fundi A Tjetër = S.

  • Tani, përdorni butonin Run ose tastin F5 për të ekzekutuar kodin.

    • Një e reDo të shfaqet kutia e dialogut.
    • Më pas, në fushën e hyrjes së asaj kutie dialogu zgjidhni diapazonin e kolonës së datës së afatit D$5:$D$9 . Më pas, klikoni në OK .

    • Do të shfaqet edhe një kuti dialogu.
    • Për më tepër, në fusha e hyrjes zgjidhni gamën e kolonës B$5:$B$9 që përmban adresat e emailit dhe klikoni në OK .

    • Për më tepër, një dritare tjetër do të shfaqet. Zgjidhni gamën e mesazheve $C$5:$C$9 në fushën e hyrjes së dritares pop.

    • Në fund , ne mund të shohim rezultate si imazhi i mëposhtëm. Ne marrim 3 email që krijohen automatikisht në 3 dritare të ndryshme të Outlook . Kjo nuk do të krijojë postë për dy adresat e para të emailit. Sepse data e duhur e këtyre dy projekteve ka mbaruar.

    Lexo më shumë: Si të dërgoni automatikisht email nga Excel bazuar në Data

    Lexime të ngjashme

    • [U zgjidh]: Ndani librin e punës që nuk shfaqet në Excel (me hapa të thjeshtë)
    • Si të dërgoni email nga lista Excel (2 mënyra efektive)
    • Si të dërgoni një fletëllogaritëse të modifikueshme të Excel me email (3 metoda të shpejta)
    • Makro për të dërguar email nga Excel (5 shembuj të përshtatshëm)
    • Makro për të dërguar email nga Excel me trup (3 raste të dobishme)

    3. Përdorni Excel Macro për të dërguar email automatikisht me bashkëngjitje

    Në shembullin e fundit, do të shohim se si mundemizhvilloni një makro excel për të dërguar automatikisht një email me bashkëngjitje. Supozoni se kemi një shtojcë në imazhin e mëposhtëm. Ne duam ta dërgojmë këtë bashkëngjitje përmes një emaili duke përdorur makro excel VBA . Për ta bërë këtë na duhet shtegu i këtij skedari excel. Këtu janë hapat për këtë:

    • Zgjidhni skedarin ' Attachment.xlsx ' '.
    • Klikoni në opsionin ' Copy Path '.

    • Pra, rruga e skedarit që marrim:
    E:\Exceldemy\Attachment.xlsx

    Ne do ta fusim këtë shteg në kodin tonë makro për ta dërguar këtë skedar me email. Ndiqni hapat e mëposhtëm për ta bërë këtë.

    HAPA:

    • Së pari, shkoni te skeda Zhvilluesi dhe zgjidhni opsionin Visual Basic .

    • Do të hapet një dritare e re me emrin ' Project – VBAProject '.
    • Së dyti, kliko me të djathtën mbi emrin e fletës.
    • Më pas, zgjidh Fut > Modulin .

    • Komanda e mësipërme do të hapë një bosh VBA
    • Së treti, shkruani kodin e mëposhtëm në atë Modul: 
    9232
    • Më pas, shtypni tastin F5 ose kliko butonin Run për të ekzekutuar kodin.

    • Së fundi, kodi do të dërgojë bashkëngjitjen në emailet e dhëna në kod. Kodi dërgon email nga Outlook . Pra, klikoni në butonin Lejo për të lejuar Outlook të dërgojë bashkëngjitjen në emailet e dhëna.

    Lexo më shumë: Si të aplikoniMakro për të dërguar email nga Excel me bashkëngjitje

    Përfundim

    Si përfundim, ky artikull tregon 3 shembuj të përdorimit të excel VBA makro në dërgoni postë automatikisht. Shkarkoni mostrën e fletës së punës të dhënë në këtë artikull për të vënë në provë aftësitë tuaja. Nëse keni ndonjë pyetje, ju lutemi lini një koment në kutinë më poshtë. Ekipi ynë do të përpiqet t'i përgjigjet mesazhit tuaj sa më shpejt të jetë e mundur. Mbani një sy për zgjidhje më krijuese Microsoft Excel në të ardhmen.

    Postimi i mëparshëm Si të printoni etiketat e barkodit në Excel (me 4 hapa të thjeshtë)
    Postimi i radhës Si të krijoni formatin e fletës së shpenzimeve ditore në Excel (me hapa të thjeshtë)

    Hugh West është një trajner dhe analist me përvojë të lartë në Excel me mbi 10 vjet përvojë në industri. Ai ka një diplomë Bachelor në Kontabilitet dhe Financë dhe një Master në Administrim Biznesi. Hugh ka një pasion për mësimdhënien dhe ka zhvilluar një qasje unike të mësimdhënies që është e lehtë për t'u ndjekur dhe kuptuar. Njohuritë e tij eksperte të Excel-it kanë ndihmuar mijëra studentë dhe profesionistë në mbarë botën të përmirësojnë aftësitë e tyre dhe të shkëlqejnë në karrierën e tyre. Nëpërmjet blogut të tij, Hugh ndan njohuritë e tij me botën, duke ofruar mësime falas në Excel dhe trajnime në internet për të ndihmuar individët dhe bizneset të arrijnë potencialin e tyre të plotë.