Kako poslati e-pošto iz Excelovega seznama (2 učinkovita načina)

Hugh West

02-10-2023 Napredni Excel
  • Deliti To
Hugh West

Ko morate poslati množično e-pošto veliki skupini ljudi, potrebujete avtomatiziran postopek, ki lahko hitro opravi ponavljajoča se opravila. Excel datoteka s seznamom e-poštnih sporočil je najpogostejši način za pošiljanje množičnih e-poštnih sporočil. Zato vam bomo v tem vodniku pokazali, kako poslati e-pošto iz datoteke Excel seznam samodejno pošljete večjemu številu ljudi.

Prenesi delovni zvezek za prakso

Prenesite ta delovni zvezek za vadbo, ki ga lahko uporabljate med branjem tega članka.

Pošlji e-pošto.xlsm

2 priročna pristopa za pošiljanje e-pošte iz Excelovega seznama

Na spodnji sliki smo vključili niz podatkov z imeni nekaterih oseb ter njihovimi e-poštnimi sporočili in registracijskimi številkami. Excel moramo vsakemu posamezniku poslati e-poštna sporočila. Za to bomo uporabili Mail Merge v programu Microsoft Word funkcija , ki mu sledi VBA kodo za pošiljanje e-poštnih sporočil želenim posameznikom z obstoječega seznama.

1. Uporaba funkcije Mail Merge za pošiljanje več e-poštnih sporočil s seznama Excel

⇒ Korak 1: Odprite novo datoteko Word

  • Odprite prazen Beseda dokument.
  • Kliknite na Pošta zavihek.
  • Od Izberite prejemnike izberite možnost Uporaba obstoječega seznama možnost.

⇒ Korak 2: Povezava seznama Excel z datoteko Word

  • Izberite Excel datoteko, v kateri ste ustvarili seznam, in kliknite na Odpri da odprete datoteko.

  • Izberite številko lista, na katerega ste zapisali seznam.
  • Nato kliknite V REDU .

⇒ Korak 3: Vstavljanje polj

  • Od Pošta kliknite na možnost Vstavljanje polja za združevanje vnesite polja, ki jih želite vstaviti.
  • Najprej vstavite Ime polje s klikom nanj in v želenem položaju splošne pošte.

  • Kot je prikazano na spodnji sliki, je po dodajanju Ime se bo prikazalo kot spremenljivka imena vsake osebe.

  • Podobno postavite Reg kjerkoli v besedilnem sporočilu.

  • Zato bo prikazana kot na spodnji sliki.

⇒ Korak 4: Preverite rezultate predogleda

  • Kliknite na Rezultati predogleda za ogled končnega predogleda pred pošiljanjem e-poštnega sporočila.
  • Spodnja slika zaslona prikazuje, kako bo videti vzorec e-poštnega sporočila.

⇒ Korak 5: Združitev e-poštnih sporočil

  • Če želite združiti e-poštna sporočila, kliknite na Zaključek & Združitev možnost.
  • Odpiranje Združevanje v e-pošto izberite polje Pošiljanje e-poštnih sporočil možnost.

  • V polju Za izberite E-pošta možnost.
  • Vnesite želeno vrstico predmeta v Predmetna vrstica škatla.
  • Oblika pošte bo HTML privzeto, zato vam tega ni treba spreminjati.
  • V možnosti Pošlji zapise kliknite na Vse .
  • Na koncu kliknite na V REDU za pošiljanje e-poštnih sporočil več prejemnikom hkrati.

  • Posledično bodo vsa e-poštna sporočila poslana prek vašega povezanega Outlook Preverite svoje Outlook poslano možnost za potrditev, da so bila e-poštna sporočila poslana.

  • Ko odprete poslano e-poštno sporočilo, boste opazili, da so v vsakem polju navedeni podatki določene osebe.

Opombe. Microsoft Outlook mora biti vaš privzeti poštni program. Če uporabljate drug poštni program, s tem postopkom ne boste mogli pošiljati e-pošte.

Preberite več: Kako samodejno poslati e-pošto, ko je pogoj izpolnjen v Excelu

Podobna branja

  • Kako po e-pošti poslati urejeno Excelovo razpredelnico (3 hitre metode)
  • [Rešeno]: Delovni zvezek v skupni rabi ni prikazan v Excelu (z enostavnimi koraki)
  • Samodejno pošiljanje elektronske pošte z opomnikom iz delovnega lista Excel z uporabo VBA
  • Kako preveriti, kdo je v skupni Excelovi datoteki (s hitrimi koraki)
  • Kako omogočiti skupno rabo delovnega zvezka v programu Excel

2. Zaženite kodo VBA za pošiljanje e-poštnih sporočil iz izbranega območja

Z blagoslovom VBA , lahko ustvarite program za pošiljanje e-poštnih sporočil iz Excel seznam z želeno izbiro območja. Za izvedbo naloge sledite opisanim korakom v nadaljevanju.

⇒ Korak 1: Ustvarite modul

  • Odpiranje Makro VBA , pritisnite Alt + F11 .
  • Kliknite na Vstavite zavihek.
  • Izberite Modul možnost za ustvarjanje Modul .

⇒ Korak 2: Prilepite kode VBA

  • V novem Modul , prilepite naslednje Koda VBA . 
 #If VBA7 And Win64 Then 'Ptr se uporablja za spremembo za delovanje 32 bitov na 64 bitov Private Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _ ByVal wnd As LongPtr, ByVal lpDirect As String, _ ByVal Parameters As String, ByVal File As String, ByVal Operation As String, _ ByVal nCmd As Long) As LongPtr #Else #End If Sub SendExcelListEMail() 'Declare the variables DimxMailAdd As String Dim xRegCode As String Dim xBody As String Dim xURLink As String Dim xRngCell As Range Dim xIntRg As Range Dim xSelectTxt As String Dim k As Integer Dim p As Double On Error Resume Next 'Select range select adddress xSelectTxt = ActiveWindow.RangeSelection.Address 'Create a Input box for the range selection Set xIntRg = Application.InputBox("Please Input Excel data range:","ExcelWIKI", xSelectTxt, , , , , , 8) 'Uporabi pogoj If za določitev številk stolpcev za operacijo If xIntRg Is Nothing Then Exit Sub If xIntRg.Columns.Count 3 Then 'Prikaži rezultat v oknu msg, če pogoj ni izpolnjen MsgBox "Error with Region Selection, please confirm", , "ExcelWIKI" Exit Sub End If 'Uporabi zanko For za izvedbo operacije v vsaki vrstici posebej For k = 1 To xIntRg.Rows.Count' Zberite e-poštni naslov in ga nastavite v spremenljivko xMailAdd = xIntRg.Cells(k, 2) ' Dajte predmet za e-pošto xRegCode = "ExcelWIKI Registracijska št." ' Vnesite telo e-pošte xBody = "" ' Vstavite imena s spremenljivko xIntRg xBody = xBody & "Greetings " & xIntRg.Cells(k, 1) & "," & vbCrLf & vbCrLf xBody = xBody & " Here is your ExcelWIKI Registration No. " ' VstaviteRegistracijska št. s spremenljivko xIntRg xBody = xBody & xIntRg.Cells(k, 3).Text & "." & vbCrLf & vbCrLf xBody = xBody & "Res smo veseli, da ste nas obiskali na naši spletni strani, še naprej nas podpirate." & vbCrLf xBody = xBody & "ExcelWIKI Team" ' Opredelite prostore s (hex) xRegCode = Application.WorksheetFunction.Substitute(xRegCode, " ", "%20") xBody =Application.WorksheetFunction.Substitute(xBody, " ", "%20") ' Navedite, da se vrnitve povozov nadomestijo s(hex) xBody = Application.WorksheetFunction.Substitute(xBody, vbCrLf, "%0D%0A") ' Ustvari povezavo URL xURLink = "mailto:" & xMailAdd & "?subject=" & xRegCode & "&body=" & xBody ' Uporabite povezavo za začetek pošiljanja e-pošte ShellExecute 0&, vbNullString, xURLink, vbNullString,vbNullString, vbNormalFocus ' trisekundni interval za pošiljanje tipk Application.Wait (Now + TimeValue("0:00:03")) Application.SendKeys "%s" Next End Sub

⇒ Korak 3: Zagon programa

  • Pritisnite F5 za zagon programa.
  • Izberite območje v vnosnem polju.
  • Kliknite . V REDU za pošiljanje e-poštnih sporočil.

  • Posledično se prikažejo predogledi pošiljanja e-poštnih sporočil, kot je prikazano na spodnji sliki.

  • Na koncu lahko preverite poslana e-poštna sporočila za potrditev.

Preberite več: Kako poslati e-pošto, če so izpolnjeni pogoji v Excelu (3 preproste metode)

Zaključek

Upam, da ste v tem članku spoznali, kako poslati množična e-poštna sporočila iz Excel seznam. Vse te postopke se je treba naučiti in jih uporabiti za svoj nabor podatkov. Oglejte si vadbeni zvezek in preizkusite te spretnosti. Zaradi vaše dragocene podpore smo motivirani, da še naprej pripravljamo tovrstne vadnice.

Če imate kakršna koli vprašanja, se obrnite na nas. V spodnjem razdelku lahko pustite tudi komentarje.

Mi, Odlično Ekipa se vedno odzove na vaša vprašanja.

Bodite z nami in se še naprej učite.

Prejšnja objava Kako dodati 30 dni datumu v Excelu (7 hitrih metod)
Naslednja objava Kako pretvoriti decimalni čas v ure in minute v Excelu

Hugh West je zelo izkušen trener Excela in analitik z več kot 10-letnimi izkušnjami v industriji. Po izobrazbi je diplomirani računovodstvo in finance ter magisterij poslovne administracije. Hugh ima strast do poučevanja in je razvil edinstven pristop k poučevanju, ki ga je enostavno slediti in razumeti. Njegovo strokovno znanje o Excelu je pomagalo na tisoče študentom in strokovnjakom po vsem svetu, da so izboljšali svoje sposobnosti in se izkazali v karieri. Prek svojega bloga Hugh deli svoje znanje s svetom, ponuja brezplačne vadnice za Excel in spletno usposabljanje, ki posameznikom in podjetjem pomaga doseči njihov polni potencial.