Quando si deve inviare un'e-mail di massa a un gruppo numeroso di persone, è necessario un processo automatizzato in grado di gestire rapidamente le attività ripetitive. Creare una Excel con un elenco di email è il modo più comune per inviare email di massa. Quindi, in questo tutorial, vi mostreremo come inviare email da un file Excel automaticamente a un gran numero di persone.

Scarica il quaderno di esercizi

Scaricate questo quaderno di esercizi per esercitarvi durante la lettura di questo articolo.

2 pratici approcci per inviare e-mail da un elenco Excel

Nell'immagine qui sotto abbiamo incluso un set di dati con i nomi di alcune persone, oltre alle loro email e ai numeri di registrazione. Dal sito Excel dobbiamo inviare messaggi di posta elettronica ad ogni singolo individuo. Per farlo, utilizzeremo La fusione di messaggi di posta di Microsoft Word funzione , seguito da un VBA per inviare messaggi di posta elettronica alle persone preferite dell'elenco esistente.

1. Applicare la funzione Mail Merge per inviare più e-mail da un elenco Excel

⇒ Passo 1: aprire un nuovo file di Word

• Aprire una finestra vuota Parola documento.
• Fare clic sul pulsante Invii di posta elettronica scheda.
• Dal Selezionare i destinatari scegliere l'opzione Utilizzare un elenco esistente opzione.

⇒ Passo 2: collegare l'elenco Excel al file Word

• Selezionare la voce Excel dove è stato creato l'elenco e fare clic su Aperto per aprire il file.

• Selezionare il numero del foglio in cui è stato scritto l'elenco.
• Quindi, fare clic su OK .

⇒ Passo 3: Inserire i campi

• Dal Invii di posta elettronica fare clic sull'opzione Inserisci campo unione per inserire i campi che si desidera inserire.
• Per prima cosa, inserire il Nome facendo clic su di esso e nella posizione preferita della posta generale.

• Come mostra l'immagine qui sotto, dopo aver aggiunto l'opzione Nome verrà visualizzato come variabile del nome di ogni persona.

• Allo stesso modo, posizionare il Reg in qualsiasi punto del messaggio di testo.

• Pertanto, apparirà come l'immagine mostrata di seguito.

⇒ Passo 4: controllare i risultati dell'anteprima

• Fare clic sul pulsante Risultati in anteprima per vedere l'anteprima finale prima di inviare l'e-mail.
• L'immagine seguente mostra l'aspetto di un'e-mail di esempio.

⇒ Passo 5: unire le e-mail

• Per unire le e-mail, fare clic sul pulsante Terminare &lificare unire opzione.
• Per aprire il Unisci alla posta elettronica selezionare la casella Inviare messaggi e-mail opzione.

• Nella casella A, selezionare la voce Email opzione.
• Digitate l'oggetto che preferite nel campo Oggetto scatola.
• Il formato della posta sarà HTML per impostazione predefinita, quindi non è necessario modificarlo.
• Nell'opzione Invia record, fare clic su Tutti .
• Infine, fare clic su OK per inviare le e-mail a più destinatari contemporaneamente.

• Di conseguenza, tutte le e-mail saranno inviate attraverso il vostro sito web associato. Prospettiva Controllate il vostro Prospettiva per confermare l'invio dei messaggi di posta elettronica.

• Quando si apre un'e-mail inviata, si nota che ogni campo è riempito con le informazioni di una persona specifica.

Per saperne di più: Come inviare automaticamente un'e-mail quando la condizione è soddisfatta in Excel

Letture simili

• Come inviare un foglio di calcolo Excel modificabile via e-mail (3 metodi rapidi)
• [Risoluzione]: Condivisione della cartella di lavoro non visualizzata in Excel (con semplici passaggi)
• Inviare automaticamente un'e-mail di promemoria da un foglio di lavoro Excel utilizzando VBA
• Come vedere chi è presente in un file Excel condiviso (con passaggi rapidi)
• Come attivare la condivisione della cartella di lavoro in Excel

2. Eseguire un codice VBA per inviare e-mail dalla selezione di un intervallo

Con la benedizione di VBA è possibile creare un programma per l'invio di messaggi di posta elettronica da un file Excel Seguire i passi indicati di seguito per eseguire l'operazione.

⇒ Passo 1: creare un modulo

• Per aprire il Macro VBA , premere Alt + F11 .
• Fare clic sul pulsante Inserire scheda.
• Selezionare la voce Modulo per creare l'opzione Modulo .

⇒ Passo 2: incollare i codici VBA

• Nel nuovo Modulo , incollare quanto segue Codice VBA .

 #Se VBA7 E Win64 Allora 'Il Ptr è usato per cambiare il funzionamento da 32 bit a 64 bit 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() 'Dichiarare le variabili 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 'Selezionare l'intervallo di indirizzi xSelectTxt = ActiveWindow.RangeSelection.Address 'Creare una casella di input per la selezione dell'intervallo Set xIntRg = Application.InputBox("Please Input Excel data range:","ExcelWIKI", xSelectTxt, , , , , 8) 'Applicare la condizione If per specificare i numeri di colonna per l'operazione If xIntRg Is Nothing Then Exit Sub If xIntRg.Columns.Count 3 Then 'Mostrare il risultato in una casella di msg per il mancato soddisfacimento della condizione MsgBox "Errore con la selezione della regione, si prega di confermare", , "ExcelWIKI" Exit Sub End If 'Applicare il ciclo For per eseguire l'operazione in ogni riga individualmente For k = 1 To xIntRg.Rows.Count' Raccogliere l'indirizzo e-mail e impostarlo nella variabile xMailAdd = xIntRg.Cells(k, 2) ' Assegnare un oggetto all'e-mail xRegCode = "ExcelWIKI Registration No." ' Scrivere il corpo dell'e-mail xBody = "" ' Inserire i nomi con la variabile xIntRg xBody = xBody & "Greetings " & xIntRg.Cells(k, 1) & "," & vbCrLf & vbCrLf xBody = xBody & " Here is your ExcelWIKI Registration No. " ' InserireNumero di registrazione con la variabile xIntRg xBody = xBody & xIntRg.Cells(k, 3).Text & "." & vbCrLf & vbCrLf xBody = xBody & "Siamo davvero felici di avervi visitato nel nostro sito, continuate a sostenerci." & vbCrLf xBody = xBody & "ExcelWIKI Team" ' Definire gli spazi con (hex) xRegCode = Application.WorksheetFunction.Substitute(xRegCode, " ", "%20") xBody =Application.WorksheetFunction.Substitute(xBody, " ", "%20") ' Specificare di sostituire i ritorni a capo con (hex) xBody = Application.WorksheetFunction.Substitute(xBody, vbCrLf, "%0D%0A") ' Generare l'URL Link xURLink = "mailto:" & xMailAdd & "?subject=" & xRegCode & "&body=" & xBody ' Usare il Link per iniziare l'invio di email ShellExecute 0&, vbNullString, xURLink, vbNullString,vbNullString, vbNormalFocus ' intervallo di tre secondi per l'invio dei tasti Application.Wait (Now + TimeValue("0:00:03")) Application.SendKeys "%s" Next End Sub 

⇒ Fase 3: Esecuzione del programma

• Stampa F5 per eseguire il programma.
• Selezionare l'intervallo nella casella di immissione.
• Cliccare OK per inviare le e-mail.

• Di conseguenza, appariranno le anteprime dell'invio dei messaggi di posta elettronica, come mostrato nell'immagine seguente.

• Infine, è possibile controllare le e-mail inviate per la conferma.

Per saperne di più: Come inviare un'e-mail se le condizioni sono soddisfatte in Excel (3 metodi semplici)

Conclusione

Spero che questo articolo vi abbia fornito un'esercitazione su come inviare email di massa da un Excel Tutte queste procedure devono essere apprese e applicate al vostro set di dati. Date un'occhiata alla cartella di lavoro pratica e mettete alla prova queste abilità. Siamo motivati a continuare a creare esercitazioni come questa grazie al vostro prezioso supporto.

Per qualsiasi domanda, contattateci e lasciate pure i vostri commenti nella sezione sottostante.

Noi, il Exceldemy Team, sono sempre pronti a rispondere alle vostre domande.

Restate con noi e continuate a imparare.