Come inserire la firma di Outlook durante l'invio di e-mail in Excel?
Supponendo di voler inviare un'e-mail direttamente in Excel, come puoi aggiungere la firma di Outlook predefinita nell'e-mail? Questo articolo fornisce due metodi per aiutarti ad aggiungere la firma di Outlook quando invii e-mail in Excel.
Inserisci la firma nell'e-mail di Outlook quando invii tramite Excel VBA
Inserisci facilmente la firma di Outlook durante l'invio di e-mail in Excel con uno strumento straordinario
Altri tutorial per l'invio di posta in Excel ...
Inserisci la firma nell'e-mail di Outlook quando invii tramite Excel VBA
Ad esempio, c'è un elenco di indirizzi e-mail in un foglio di lavoro, per inviare e-mail a tutti questi indirizzi in Excel e aggiungere la firma di Outlook predefinita nelle e-mail. Si prega di applicare il codice VBA sottostante per ottenerlo.
1. Aprire il foglio di lavoro che contiene l'elenco di indirizzi e-mail a cui si desidera inviare un'e-mail, quindi premere il tasto altro + F11 chiavi.
2. In apertura Microsoft Visual Basic, Applications Edition finestra, fare clic inserire > Modulo, e quindi copia il seguente VABA 2 nella finestra del codice del modulo.
3. Ora è necessario sostituire il file .Corpo linea in VABA 2 con il codice in VABA 1. Dopodiché, sposta la linea .Schermo sotto la linea Con xMailOut.
VBA 1: modello di invio di e-mail con la firma predefinita di Outlook in Excel
.HTMLBody = "This is a test email sending in Excel" & "<br>" & .HTMLBody
VBA 2: invia e-mail agli indirizzi e-mail specificati nelle celle in Excel
Sub SendEmailToAddressInCells()
Dim xRg As Range
Dim xRgEach As Range
Dim xRgVal As String
Dim xAddress As String
Dim xOutApp As Outlook.Application
Dim xMailOut As Outlook.MailItem
On Error Resume Next
xAddress = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select email address range", "KuTools For Excel", xAddress, , , , , 8)
If xRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
Set xOutApp = CreateObject("Outlook.Application")
Set xRg = xRg.SpecialCells(xlCellTypeConstants, xlTextValues)
For Each xRgEach In xRg
xRgVal = xRgEach.Value
If xRgVal Like "?*@?*.?*" Then
Set xMailOut = xOutApp.CreateItem(olMailItem)
With xMailOut
.To = xRgVal
.Subject = "Test"
.Body = "Dear " _
& vbNewLine & vbNewLine & _
"This is a test email " & _
"sending in Excel"
.Display
'.Send
End With
End If
Next
Set xMailOut = Nothing
Set xOutApp = Nothing
Application.ScreenUpdating = True
End Sub
Lo screenshot seguente può aiutarti a trovare facilmente le differenze dopo aver modificato il codice VBA.
4. premi il F5 chiave per eseguire il codice. Poi un Kutools for Excel si apre la casella di selezione, selezionare gli indirizzi e-mail a cui verranno inviate le e-mail, quindi fare clic su OK.
Quindi vengono create le e-mail. Puoi vedere la firma predefinita di Outlook aggiunta alla fine del corpo dell'e-mail.
Suggerimenti:
- 1. È possibile modificare il corpo dell'email nel codice VBA 1 in base alle proprie esigenze.
- 2. Dopo aver eseguito il codice, se viene visualizzata una finestra di dialogo di errore che avverte che il tipo definito dall'utente non è definito, chiudere questa finestra di dialogo e quindi fare clic su Strumenti > Riferimenti nel Microsoft Visual Basic, Applications Edition finestra. In apertura Riferimenti - VBAProject finestra, controlla il file Libreria di oggetti di Microsoft Outlook box e clicca OK. E poi esegui di nuovo il codice.
Inserisci facilmente la firma di Outlook durante l'invio di e-mail in Excel con uno strumento straordinario
Se sei un principiante in VBA, qui consiglio vivamente il Inviare emails utilità di Kutools for Excel per te. Con questa funzione, puoi inviare facilmente e-mail in base a determinati campi in Excel e aggiungere la firma di Outlook. Si prega di fare quanto segue.
Prima di applicare Kutools for Excel, Per favore scaricalo e installalo prima.
In primo luogo, è necessario creare una mailing list con diversi campi su cui inviare le e-mail.
Puoi creare manualmente una mailing list in base alle tue esigenze o applicare la funzione Crea mailing list per farlo rapidamente.
1. Clic Kutools Plus > Crea mailing list.
2. Nel Crea mailing list finestra di dialogo, specificare i campi necessari, scegliere dove stampare l'elenco, quindi fare clic su OK pulsante.
3. Ora viene creato un esempio di mailing list. Poiché si tratta di un elenco di esempio, è necessario modificare i campi con determinati contenuti necessari. (sono consentite più righe)
4. Successivamente, seleziona l'intero elenco (includi le intestazioni), fai clic su Kutools Plus > Inviare emails.
5. Nel Inviare emails la finestra di dialogo:
- 5.1) Gli elementi nella mailing list selezionata vengono inseriti automaticamente nei campi corrispondenti;
- 5.2) Termina il corpo dell'email;
- 5.3) Verificare sia il file Invia email tramite Outlook ed Usa le impostazioni della firma di Outlook scatole;
- 5.4) Fare clic su Invia pulsante. Vedi screenshot:
Ora vengono inviate le e-mail. E la firma predefinita di Outlook viene aggiunta alla fine del corpo dell'email.
Se desideri avere una prova gratuita (30 giorni) di questa utility, fare clic per scaricarlo, quindi andare ad applicare l'operazione secondo i passaggi precedenti.
Articoli correlati:
Invia e-mail agli indirizzi e-mail specificati nelle celle in Excel
Supponendo che tu abbia un elenco di indirizzi e-mail e desideri inviare messaggi e-mail a questi indirizzi in blocco direttamente in Excel. Come ottenerlo? Questo articolo ti mostrerà i metodi per inviare e-mail a più indirizzi e-mail specificati nelle celle in Excel.
Invia e-mail copiando e incollando un intervallo specificato nel corpo dell'e-mail in Excel
In molti casi, un intervallo di contenuti specificato nel foglio di lavoro di Excel può essere utile nella comunicazione e-mail. In questo articolo, introdurremo un metodo per inviare un'e-mail con un intervallo specificato incollato nel corpo dell'e-mail direttamente in Excel.
Invia e-mail con più allegati allegati in Excel
Questo articolo parla dell'invio di un'e-mail tramite Outlook con più allegati allegati in Excel.
Invia e-mail se la data di scadenza è stata rispettata in Excel
Ad esempio, se la data di scadenza nella colonna C è inferiore o uguale a 7 giorni (la data corrente è 2017/9/13), inviare un promemoria e-mail al destinatario specificato nella colonna A con il contenuto specificato nella colonna B. Procedura raggiungerlo? Questo articolo fornirà un metodo VBA per affrontarlo in dettaglio.
Invia automaticamente e-mail in base al valore della cella in Excel
Supponendo di voler inviare un'e-mail tramite Outlook a un determinato destinatario in base a un valore di cella specificato in Excel. Ad esempio, quando il valore della cella D7 in un foglio di lavoro è maggiore di 200, viene creata automaticamente un'e-mail. Questo articolo introduce un metodo VBA per risolvere rapidamente questo problema.
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!