Come inviare e-mail da Excel con collegamento ipertestuale nel corpo dell'e-mail?
Hai mai provato a inviare un'e-mail con codice VBA in Excel? E come aggiungere collegamenti ipertestuali al testo del corpo dell'e-mail durante l'invio di e-mail? Questo articolo aiuterà a risolvere questo problema.
Inserisci il collegamento ipertestuale nel corpo dell'email con il codice VBA
Inserisci il collegamento ipertestuale nel corpo dell'email con il codice VBA
Il codice VBA sottostante può aiutare a inviare e-mail da Excel e inserire un collegamento ipertestuale specifico nel corpo dell'e-mail. Si prega di fare quanto segue.
1. Avvia la tua cartella di lavoro, premi il tasto altro + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. Nel Microsoft Visual Basic, Applications Edition finestra, fare clic inserire > Modulo, e quindi copia il codice VBA sottostante nell'editor del modulo.
Codice VBA: inserisci il collegamento ipertestuale nel corpo dell'email
Sub EmailHyperlink()
'updated by Extendoffice 20190815
Dim xOtl As Object
Dim xOtlMail As Object
Dim xStrBody As String
xStrBody = "Hi there:" & "<br>" _
& "Please click " & "<a href=" & "http://www.extendoffice.com"">Here</a> to open the page" & "<br>" _
& "Thank you."
On Error Resume Next
Set xOtl = CreateObject("Outlook.Application")
Set xOtlMail = xOtl.CreateItem(olMailItem)
With xOtlMail
.To = "Email Address"
.CC = "Email Address "
.BCC = " Email Address "
.Subject = "Subject line"
.HTMLBody = .HTMLBody & xStrBody
.Display
End With
Set xOtl = Nothing
Set xOtlMail = Nothing
End Sub
Note:
- Si prega di modificare il contenuto del corpo e il collegamento ipertestuale nel file xStrBody linea.
- Sostituisci il "Email"Nel .Per, .CC e .BCC righe con gli indirizzi email effettivi a cui invierai l'email. Se non hai bisogno delle righe CC e BCC, rimuovile semplicemente dall'intero codice o aggiungi una singola virgoletta prima delle righe, ad esempio "CC =" Email Address ".
- Sostituisci il "Linea tematica"Nel .Soggetto in linea con l'oggetto dell'email.
3. premi il F5 chiave per eseguire il codice. Quindi l'email viene creata con i campi specificati e il corpo con il collegamento ipertestuale elencato all'interno, fare clic sul pulsante Invia per inviarlo.
Articoli correlati
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.
Invia e-mail se si fa clic sul pulsante in Excel
Supponendo che sia necessario inviare e-mail tramite Outlook facendo clic su un pulsante nel foglio di lavoro di Excel, come si può fare? Questo articolo introdurrà un metodo VBA per ottenerlo nei dettagli.
Invia e-mail se la data di scadenza è stata rispettata in Excel
Supponendo che la data di scadenza nella colonna C sia inferiore o uguale a 7 giorni (la data corrente è 2017/9/13), quindi inviare un promemoria e-mail al destinatario specificato nella colonna A con il contenuto specificato nella colonna B. Come ottenerlo? Il metodo in questo articolo può farti un favore.
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!