Sommario
Quando gli utenti inviano e-mail ai loro clienti o ai loro capi, è piuttosto difficile tenerne traccia. In questo caso, Excel si rivela utile. Pertanto, "invia e-mail automatiche da Excel a Prospettiva" si è dimostrato un approccio che permette di risparmiare tempo. Macro VBA di Excel e il COLLEGAMENTO IPERTESTUALE La funzione può inviare e-mail automatiche o creare una bozza utilizzando le voci di Excel.
Diciamo che abbiamo Dipendente Stipendio ristrutturato dati in Excel e vogliamo inviare un'email automatica utilizzando Prospettiva .
In questo articolo dimostriamo diverse varianti di Macro VBA e il COLLEGAMENTO IPERTESTUALE per inviare e-mail automatiche da Excel a Prospettiva .
Scarica la cartella di lavoro di Excel
Inviare e-mail automatiche.xlsm⧭ Apertura di Microsoft Visual Basic e inserimento di codice nel modulo
Prima di procedere alla dimostrazione di qualsiasi metodo, è necessario conoscere le modalità di apertura e inserimento di un file Modulo nel Microsoft Visual Basic in Excel.
🔄 Apertura di Microsoft Visual Basic: Ci sono principalmente 3 modi per aprire Microsoft Visual Basic finestra.
1. Utilizzo delle scorciatoie da tastiera: Stampa ALT+F11 complessivamente per aprire Microsoft Visual Basic finestra.
2. Utilizzando la scheda Sviluppatore: In un foglio di lavoro Excel, andare su Scheda sviluppatore Seleziona Visual Basic . il Microsoft Visual Basic appare la finestra.
3. Utilizzando la scheda Foglio di lavoro: Andare a qualsiasi foglio di lavoro, Cliccare con il tasto destro del mouse su di esso; Scegliere Codice (dal Contesto Menu ).
🔄 Inserimento di un modulo in Microsoft Visual Basic: Ci sono 2 modi per inserire un Modulo in Microsoft Visual Basic finestra,
1. Utilizzo delle opzioni del foglio: Dopo aver aperto il Microsoft Visual Basic selezionare una finestra Foglio di lavoro > Cliccare con il tasto destro del mouse su di esso; Seleziona Inserire (dal Menu contestuale )> quindi scegliere Modulo .
2. Utilizzo della barra degli strumenti: È possibile farlo anche selezionando Inserire (dal Barra degli strumenti )> allora scegliendo Modulo .
4 modi semplici per inviare e-mail automatiche da Excel a Outlook
Metodo 1: utilizzo della macro VBA per l'invio automatico di e-mail tramite Outlook a destinatari selezionati
Vogliamo creare un'esecuzione di macro Pulsante con cui possiamo semplicemente inviare la posta ai destinatari selezionati con un semplice clic.
Fase 1: Vai al sito Inserire scheda> Forme Selezionare una qualsiasi delle forme proposte (ad esempio, Rettangolare: angoli arrotondati ).
Fase 2: Trascinare il Icona Plus in cui si vuole inserire il campo Forma come mostrato nell'immagine seguente.
Fase 3: Scegliere un'opzione preferita Riempimento della forma e Schema Colore quindi fare clic con il tasto destro del mouse su di esso. Fare clic su Modifica del testo per inserire il testo.
Passo 4: Utilizzare il istruzione per aprire Microsoft Visual Basic e inserire Modulo Incollare la seguente macro nella cartella Modulo .
Sub ExcelToOutlookSR() Dim mApp As Object Dim mMail As Object Dim SendToMail As String Dim MailSubject As String Dim mMailBody As String For Each r In Selection SendToMail = Range("C" & r.Row) MailSubject = Range("F" & r.Row) mMailBody = Range("G" & r.Row) Set mApp = CreateObject("Outlook.Application") Set mMail = mApp.CreateItem(0) With mMail .To = SendToMail .Subject = MailSubject.Body = mMailBody .Display ' Si può usare .Send End With Next r End Sub
➤ nel codice,
1 - iniziare la macroprocedura dichiarando le variabili come Oggetto e Stringa .
2 - eseguire un VBA PER per ogni riga della selezione, per assegnare il valore di Email Invia a , Oggetto , e Corpo utilizzando le voci di riga.
3 - assegnare le variabili.
4 - eseguire il VBA con per popolare il file Prospettiva articoli come Invia a , Posta Oggetto ecc. Qui la macro esegue solo il comando Display comando per far emergere Prospettiva con una bozza di e-mail. Tuttavia, se Inviare viene utilizzato al posto o dopo il comando Display, Prospettiva invierà l'e-mail creata ai destinatari selezionati.
5 - finire il VBA PER ciclo.
Passo 5: Tornate al foglio di lavoro e fate clic con il tasto destro del mouse sulla voce Forma quindi selezionare Assegnazione di macro dal Menu contestuale opzioni.
Passo 6: Selezionare la Macro (ad es, ExcelToOutlookSR ) sotto il Nome della macro e scegliere l'opzione Macro in opzione come Questo libro di lavoro . Clicca su OK .
Passo 7: Ora, nel foglio di lavoro, selezionate uno o più dipendenti e fate clic sul pulsante Pulsante Forma .
Passo 8: Richieste di Excel Prospettiva e crea o invia messaggi di posta elettronica ai dipendenti selezionati. Quando si selezionano due dei dipendenti, Prospettiva genera due diverse bozze di e-mail pronte per essere inviate.
Poiché la macro fornisce solo l'opzione Display comando, Prospettiva visualizza solo la bozza dell'e-mail senza inviarla. Usare l'opzione Inviare per inviare automaticamente messaggi di posta elettronica da Excel a Prospettiva utilizzando le voci delle celle.
Per saperne di più: Macro di Excel per l'invio automatico di e-mail (3 esempi)
Metodo 2: invio automatico di e-mail da Excel a Outlook in base al valore di una cella specifica
E se si volesse inviare un'email automatica dopo il raggiungimento degli obiettivi da parte di Excel a Prospettiva Un codice macro può svolgere questo compito con facilità.
Supponiamo di avere Dati di vendita trimestrali come illustrato di seguito, dopo aver raggiunto un obiettivo (ad es, Vendite> 2000 ) richiederà automaticamente Prospettiva per inviare un'e-mail da Excel a un id di posta elettronica assegnato.
Fase 1: Digitate il seguente codice macro in un qualsiasi Modulo .
Option Explicit Dim Rng As Range Sub Worksheet_Change(ByVal mRng As Range) On Error Resume Next If mRng.Cells.Count> 1 Then Exit Sub Set Rng = Intersect(Range("F17"), mRng) If Rng Is Nothing Then Exit Sub If IsNumeric(mRng.Value) And Target.Value> 2000 Then Call ExcelToOutlook End If End Sub ExcelToOutlook() Dim mApp As Object Dim mMail As Object Dim mMailBody As String Set mApp =CreateObject("Outlook.Application") Set mMail = mApp.CreateItem(0) mMailBody = "Greetings Sir" & vbNewLine & vbNewLine & _ "Il nostro punto vendita ha registrato vendite trimestrali superiori all'obiettivo." & vbNewLine & _ "È una mail di conferma." & vbNewLine & _ "Regards" & vbNewLine & _ "Outlet Team" On Error Resume Next With mMail .To = "[email protected]" .CC = "".BCC = "" .Subject = "Notifica del raggiungimento dell'obiettivo di vendita" .Body = mMailBody .Display 'oppure si può usare .Send End With On Error GoTo 0 Set mMail = Nothing Set mApp = Nothing End Sub
➤ Dall'immagine precedente, nelle sezioni,
1 - assegnare una cella (ad es, F17 ) all'interno di un intervallo per eseguire l'operazione VBA IF Se l'istruzione dà come risultato Vero , la macro richiama un'altra macro per l'esecuzione.
2 - dichiarare i tipi di variabile e assegnarli per popolare Prospettiva le voci di spesa.
3 - eseguire VBA con per assegnare variabili alle voci di posta elettronica. Utilizzare l'istruzione Inviare invece di Display nel caso in cui si desideri inviare direttamente le e-mail senza rivederle. L'e-mail del destinatario viene inserita all'interno della macro. Utilizzare metodi alternativi nel caso in cui si desideri un inserimento automatico dell'ID e-mail del destinatario.
4 - eliminare alcune variabili dall'assegnazione.
Fase 2: Utilizzare il F5 per eseguire la macro. In un attimo Excel recupera Prospettiva con una bozza di e-mail creata automaticamente come mostrato di seguito. È possibile fare clic su Inviare o l'invio automatico utilizzando Inviare nella macro.
Per saperne di più: Invio automatico di e-mail da Excel in base al contenuto delle celle (2 metodi)
Letture simili
- Come vedere chi è presente in un file Excel condiviso (con passaggi rapidi)
- Abilita la condivisione della cartella di lavoro in Excel
- Come condividere un file Excel per più utenti
- Come applicare una macro per inviare un'e-mail da Excel con allegato
Metodo 3: utilizzo della macro VBA per inviare e-mail con foglio di lavoro attivo da Excel a Outlook
In alternativa, possono verificarsi casi in cui è necessario inviare un intero file Scheda attiva a un indirizzo e-mail assegnato. In questo caso, possiamo utilizzare un'opzione Funzione personalizzata VBA da richiamare all'interno di una macro.
Fase 1: Inserite la macro seguente nella cartella Modulo .
Function ExcelOutlook(mTo, mSub As String, Optional mCC As String, Optional mBd As String) As Boolean On Error Resume Next Dim mApp As Object Dim rItem As Object Set mApp = CreateObject("Outlook.Application") Set rItem = mApp.CreateItem(0) With rItem .To = mTo .CC = "" .Subject = mSub .Body = mBd .Attachments.Add ActiveWorkbook.FullName .Display 'oppure si può usare .Send End With Set rItem = NothingSet mApp = Nothing End Function Sub OutlookMail() Dim mTo As String Dim mSub As String Dim mBd As String mTo = "[email protected]" mSub = "Quarterly Sales Data" mBd = "Greetings Sir" & vbNewLine & vbNewLine & _ "Kindly find Outlet's Quarterly Sales data attached with this mail." & vbNewLine & _ "It's a notification mail." & vbNewLine & vbNewLine & _ "Regards" &vbNewLine & _ "Team Outlet" If ExcelOutlook(mTo, mSub, , mBd) = True Then MsgBox "Creata con successo la bozza di posta o inviata" End If End Sub
Dall'immagine precedente, le sezioni del codice,
1 - dichiarare e impostare le variabili.
2 - assegnare i comandi utilizzando il comando VBA con Utilizzare la dichiarazione Display o Inviare per rivedere o inviare direttamente le e-mail.
3 - cancellare le variabili precedentemente impostate.
4 - assegnare il VBA con comandi con testi.
5 - eseguire il Funzione personalizzata VBA .
Fase 2: Per eseguire la macro premere F5 e istantaneamente Excel fa emergere il Prospettiva con una bozza di e-mail da rivedere, simile a quella dell'immagine qui sotto, per poi poterla inviare.
Per saperne di più: Come inviare e-mail di massa da Outlook utilizzando Excel (3 modi)
Metodo 4: Invio automatico di e-mail da Excel a Outlook utilizzando la funzione HYPERLINK
Il COLLEGAMENTO IPERTESTUALE La funzione genera un collegamento cliccabile nelle celle di Excel per portare Prospettiva come mezzo per inviare e-mail automatiche da Excel.
Fase 1: Digitare la seguente formula nella cella H5 .
=HYPERLINK("MailTo:"&C5&"?Subject="&F5&"&cc="&$D$2&"&body="&G5, "Clicca qui")
Il COLLEGAMENTO IPERTESTUALE la funzione prende "MailTo:"&C5&"?Subject="&F5&"&cc="&$D$2&"&body="G 5 come link_location , e "Clicca qui" come nome_amico .
Fase 2: Colpire ENTRARE per incollare il link, quindi fare clic sul link.
Fase 3: Excel vi porta a Prospettiva E vedete tutti i Prospettiva Le voci sono riempite con i dati assegnati da Excel. Fare clic su Inviare .
Passo 4: Trascinare il Maniglia di riempimento per applicare la formula ad altre celle.
Per saperne di più: Come inviare automaticamente un'e-mail quando la condizione è soddisfatta in Excel
Conclusione
Varianti di macro VBA e COLLEGAMENTO IPERTESTUALE può essere utile per l'invio automatico di e-mail da Excel a Outlook. Spero che troviate il vostro metodo preferito tra quelli descritti sopra. Commentate se avete ulteriori domande o avete qualcosa da aggiungere.