Home-theater-designers
Upang magpadala ng mga email mula sa Microsoft Excel nangangailangan lamang ng ilang simpleng mga script. Idagdag ang pagpapaandar na ito sa iyong mga spreadsheet at talagang mapapahusay mo kung magkano ang makakamit mo sa Excel.
Sinasaklaw namin ang maraming mahusay na mga macros ng Excel, na maaaring makamit ang parehong mga bagay na magagawa ng mga script ng VBA, ngunit nang hindi nangangailangan ng kaalaman sa pag-program. Ngunit maraming mga advanced na bagay na magagawa mo lamang sa VBA, tulad ng paglikha ng isang ulat ng spreadsheet sa lahat ng iyong impormasyon sa PC.
Mas gusto na panoorin ang tutorial na ito bilang isang video? Napatakip ka namin!
Bakit Magpadala ng Email Mula sa Excel?
Mayroong maraming mga kadahilanan kung bakit maaaring gusto mong magpadala ng isang email mula sa loob ng Microsoft Excel.
Marahil ay mayroon kang kawani na nag-a-update ng mga dokumento o mga spreadsheet sa lingguhang batayan, at nais mong makatanggap ng isang abiso sa email kung tapos na ang mga pag-update na iyon. O maaaring mayroon kang isang spreadsheet ng mga contact at nais mong magpadala ng isang email sa kanilang lahat nang sabay-sabay.
Marahil ay iniisip mo na ang pag-script ng isang email na nai-broadcast mula sa Excel ay magiging kumplikado. Hindi naman iyon ang kaso.
Ang pamamaraan sa artikulong ito ay gagamitin ang isang tampok na magagamit sa Excel VBA sa mahabang panahon, Mga Bagay sa Data ng Pakikipagtulungan (CDO).
Ang CDO ay isang sangkap ng pagmemensahe na ginamit sa Windows mula pa noong maagang henerasyon ng OS. Ito ay tinatawag na CDONTS, at pagkatapos ay ang pagkakaroon ng Windows 2000 at XP, pinalitan ng 'CDO para sa Windows 2000'. Ang sangkap na ito ay isinama na sa iyong pag-install ng VBA sa loob ng Microsoft Word o Excel at handa nang gamitin.
Ginagamit ang paggamit ng sangkap na nagpapadala ng mga email mula sa loob ng mga produktong Windows na may VBA na napakadali. Sa halimbawang ito, gagamitin mo ang sangkap ng CDO sa Excel upang magpadala ng isang email na maghahatid ng mga resulta mula sa isang tukoy na Excel cell.
Hakbang 1: Lumikha ng isang VBA Macro
Ang unang hakbang ay upang pumunta sa tab ng Developer ng Excel.
Sa loob ng tab ng Developer, mag-click sa Isingit sa kahon ng Mga Kontrol, at pagkatapos ay pumili ng isang pindutan ng utos.
Iguhit ito sa sheet at pagkatapos ay lumikha ng isang bagong macro para dito sa pamamagitan ng pag-click sa Macros sa Developer ribbon.
Kapag na-click mo ang Lumikha pindutan, bubuksan nito ang editor ng VBA.
Idagdag ang sanggunian sa library ng CDO sa pamamagitan ng pag-navigate sa Mga kasangkapan > Mga Sanggunian sa editor.
Mag-scroll pababa sa listahan hanggang sa makita mo Microsoft CDO para sa Windows 2000 Library . Markahan ang checkbox at mag-click OK lang .
Kapag nag-click ka OK lang , itala ang pangalan ng pagpapaandar kung saan mo ididikit ang script. Kakailanganin mo ito sa paglaon.
Hakbang 2: I-set up ang CDO 'Mula' at 'Sa' Mga Patlang
Upang magawa ito, kailangan mo munang likhain ang mga mail object at i-set up ang lahat ng mga patlang na kinakailangan upang maipadala ang email.
Isaisip na habang ang marami sa mga patlang ay opsyonal, ang Mula sa at Sa ang mga patlang ay kinakailangan.
ay wish ligtas na bumili mula sa
Dim CDO_Mail As Object
Dim CDO_Config As Object
Dim SMTP_Config As Variant
Dim strSubject As String
Dim strFrom As String
Dim strTo As String
Dim strCc As String
Dim strBcc As String
Dim strBody As String
strSubject = 'Results from Excel Spreadsheet'
strFrom = 'rdube02@gmail.com'
strTo = 'rdube02@gmail.com'
strCc = ''
strBcc = ''
strBody = 'The total results for this quarter are: ' & Str(Sheet1.Cells(2, 1))Ang cool na bagay tungkol dito ay maaari kang lumikha ng anumang string na nais mong ipasadya isang buong email message at italaga ito sa strBody variable.
Pinagsamang mga sangkap ng mensahe sa pamamagitan ng paggamit ng & string upang magsingit ng data mula sa alinman sa mga sheet ng Microsoft Excel mismo sa mensahe ng email, tulad ng ipinakita sa itaas.
Hakbang 3: I-configure ang CDO upang Gumamit ng isang Panlabas na SMTP
Ang susunod na seksyon ng code ay kung saan mo i-configure ang CDO upang magamit ang anumang panlabas na SMTP server upang maipadala ang email.
Ang halimbawang ito ay isang pag-setup na hindi SSL sa pamamagitan ng Gmail. May kakayahang SSL ang CDO, ngunit nasa labas ng saklaw ng artikulong ito. Kung kailangan mong gumamit ng SSL, ito advanced code sa Github makakatulong.
Set CDO_Mail = CreateObject('CDO.Message')
On Error GoTo Error_Handling
Set CDO_Config = CreateObject('CDO.Configuration')
CDO_Config.Load -1
Set SMTP_Config = CDO_Config.Fields
With SMTP_Config
.Item('http://schemas.microsoft.com/cdo/configuration/sendusing') = 2
.Item('http://schemas.microsoft.com/cdo/configuration/smtpserver') = 'smtp.gmail.com'
.Item('http://schemas.microsoft.com/cdo/configuration/smtpauthenticate') = 1
.Item('http://schemas.microsoft.com/cdo/configuration/sendusername') = 'email@website.com'
.Item('http://schemas.microsoft.com/cdo/configuration/sendpassword') = 'password'
.Item('http://schemas.microsoft.com/cdo/configuration/smtpserverport') = 25
.Item('http://schemas.microsoft.com/cdo/configuration/smtpusessl') = True
.Update
End With
With CDO_Mail
Set .Configuration = CDO_Config
End WithHakbang 4: Tapusin ang Pag-setup ng CDO
Ngayon na na-configure mo ang koneksyon sa SMTP server para sa pagpapadala ng email, ang kailangan mo lang gawin ay punan ang naaangkop na mga patlang para sa Object ng CDO_Mail , at ilabas ang Ipadala utos
Narito kung paano mo gawin iyon:
CDO_Mail.Subject = strSubject
CDO_Mail.From = strFrom
CDO_Mail.To = strTo
CDO_Mail.TextBody = strBody
CDO_Mail.CC = strCc
CDO_Mail.BCC = strBcc
CDO_Mail.Send
Error_Handling:
If Err.Description '' Then MsgBox Err.DescriptionHindi magkakaroon ng anumang mga pop-up box o mensahe ng alerto sa seguridad, na maaaring mangyari kapag gumamit ka ng Outlook mail object.
Pinagsasama-sama lamang ng CDO ang email at ginagamit ang iyong mga detalye ng koneksyon sa server ng SMTP upang mapapatay ang mensahe. Ito ang pinakamadaling paraan upang isama ang email sa mga script ng Microsoft Word o Excel VBA.
Upang ikonekta ang iyong command button sa script na ito, pumunta sa code editor at mag-click sa Sheet1 upang matingnan ang VBA code para sa worksheet na iyon.
I-type ang pangalan ng pagpapaandar kung saan mo na-paste ang script sa itaas.
mga laro upang i-play kapag ang iyong nababato online
Narito kung ano ang hitsura ng mensahe na natanggap ko sa aking inbox:
Tandaan : Kung nakatanggap ka ng isang error na nagbabasa Nabigo ang transportasyon na kumonekta sa server , tiyaking naipasok mo ang tamang username, password, SMTP server, at numero ng port sa mga linya ng code na nakalista sa ilalim Sa SMTP_Config .
Dalhin Ito Layo at Awtomatiko ang Buong Proseso
Mabuti at mabuti ang lahat upang makapagpadala ng email mula sa Excel sa pagpindot sa isang pindutan. Gayunpaman, baka gusto mong gamitin ang pagpapaandar na ito nang regular, kung saan may katuturan na i-automate ang proseso.
Upang magawa ito, kakailanganin mong gumawa ng pagbabago sa macro. Tumungo sa Visual Basic Editor at kopyahin at i-paste ang kabuuan ng code na pinagsama namin.
Susunod, piliin AngWorkbook na ito galing sa Proyekto hierarchy
Mula sa dalawang patlang na dropdown sa tuktok ng window ng code, piliin ang Workbook at piliin Buksan mula sa dropdown ng Mga Paraan.
I-paste ang email script sa itaas sa Pribadong Sub Workbook_Open () .
Patakbuhin nito ang macro tuwing binubuksan mo ang Excel file.
Susunod, buksan mo Tagapag-iskedyul ng Gawain .
Gagamitin mo ang tool na ito upang hilingin sa Windows na awtomatikong buksan ang spreadsheet sa mga regular na agwat, sa oras na iyon ay sisimulan ang iyong macro, na nagpapadala ng email.
Pumili Lumikha ng Pangunahing Gawain ... galing sa Kilos menu at gumana ang iyong paraan sa pamamagitan ng wizard hanggang sa maabot mo ang Kilos screen
Pumili Magsimula ng isang programa at mag-click Susunod .
Gamitin ang Mag-browse na pindutan upang hanapin ang lokasyon ng Microsoft Excel sa iyong computer, o kopyahin at i-paste ang path sa Programa / iskrip patlang
Pagkatapos, ipasok ang landas sa iyong dokumento sa Microsoft Excel sa Magdagdag ng mga argumento patlang
Kumpletuhin ang wizard, at ang iyong pag-iiskedyul ay nasa lugar.
Ito ay nagkakahalaga ng pagpapatakbo ng isang pagsubok sa pamamagitan ng pag-iskedyul ng aksyon sa loob ng ilang minuto sa hinaharap, pagkatapos ay susugan ang gawain sa sandaling makumpirma mo na gumagana ito.
Tandaan : Maaaring kailanganin mong ayusin ang mga setting ng iyong Trust Center upang matiyak na maayos ang paggana ng macro.
Upang magawa ito, buksan ang spreadsheet at mag-navigate sa File > Mga pagpipilian > Trust Center .
Mula dito, mag-click Mga Setting ng Trust Center , at sa susunod na screen itakda ang radio dial sa Huwag magpakita ng impormasyon tungkol sa naka-block na nilalaman .
Gawin ang Microsoft Excel para sa Iyo
Ang Microsoft Excel ay isang hindi kapani-paniwalang makapangyarihang tool, ngunit ang pag-aaral kung paano masulit ang mga ito ay maaaring maging isang maliit na pananakot. Kung nais mong tunay na makabisado ang software, kailangan mong maging komportable sa VBA , at iyan ay hindi maliit na gawain.
kung paano makakuha ng mas maraming mga filter para sa snapchat
Gayunpaman, ang mga resulta ay nagsasalita para sa kanilang sarili. Sa pamamagitan ng isang maliit na karanasan sa VBA sa ilalim ng iyong sinturon, madali mong magagawa ang Microsoft Excel na awtomatikong gumanap ng mga pangunahing gawain, na magbibigay sa iyo ng mas maraming oras upang mag-isiping mabuti sa mas maraming pagpindot sa mga bagay.
Ito ay tumatagal ng oras upang bumuo ng kadalubhasaan sa VBA, ngunit makikita mo sa lalong madaling panahon ang mga bunga ng iyong paggawa kung maaari kang manatili dito.
Ang isang magandang lugar upang magsimula ay ang aming awtoridad tutorial sa paggamit ng VBA sa Excel . Kapag natapos mo na iyan, ang simpleng script na ito upang magpadala ng mga email mula sa Excel ay magiging pakiramdam ng paglalaro ng bata.
Magbahagi Magbahagi Mag-tweet Email Canon vs. Nikon: Aling Camera Brand Ay Mas Mabuti?Ang Canon at Nikon ay ang dalawang pinakamalaking pangalan sa industriya ng camera. Ngunit aling tatak ang nag-aalok ng mas mahusay na lineup ng mga camera at lente?
Basahin Susunod Mga Kaugnay na Paksa- Pagiging produktibo
- Programming
- Mga Tip sa Email
- Programming
- Visual Basic Programming
- Microsoft Excel
- Mga Tip sa Microsoft Office
Si Ryan ay may kursong BSc sa Electrical Engineering. Nagtrabaho siya ng 13 taon sa automation engineering, 5 taon sa IT, at ngayon ay isang App Engineer. Isang dating Managing Editor ng MakeUseOf, binigkas siya sa mga pambansang kumperensya sa Data Visualization at naitampok sa pambansang TV at radyo.
Higit pa Mula kay Ryan DubeMag-subscribe sa aming newsletter
Sumali sa aming newsletter para sa mga tip sa tech, pagsusuri, libreng ebook, at eksklusibong deal!
Mag-click dito upang mag-subscribe