Come inviare un'email da Excel con un collegamento ipertestuale nel corpo dell'email?

Hai mai provato a inviare un'email con il codice VBA in Excel? E come aggiungere collegamenti ipertestuali al testo del corpo dell'email durante l'invio? Questo articolo ti aiuterà a risolvere questo problema.

Inserisci collegamento ipertestuale nel corpo dell'email con il codice VBA

Inserisci collegamento ipertestuale nel corpo dell'email con il codice VBA

Il seguente codice VBA può aiutare a inviare un'email da Excel e inserire un collegamento ipertestuale specifico nel corpo dell'email. Procedi come segue.

1. Apri la tua cartella di lavoro, premi i tasti Alt + F11 per aprire la finestra Microsoft Visual Basic for Applications.

2. Nella finestra Microsoft Visual Basic for Applications, clicca su Inserisci > Modulo, quindi copia il seguente codice VBA nell'editor del Modulo.

Codice VBA: Inserisci 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:

• Modifica il contenuto del corpo e il collegamento ipertestuale nella riga xStrBody.
• Sostituisci “Indirizzo Email” nelle righe .A, .CC e .BCC con gli indirizzi email effettivi a cui desideri inviare l'email. Se non hai bisogno delle righe CC e BCC, rimuovile dall'intero codice o aggiungi un singolo apice prima delle righe, ad esempio 'CC =”Indirizzo Email”.
• Sostituisci “Oggetto” nella riga .Oggetto con il tuo oggetto email personale.

3. Premi il tasto F5 per eseguire il codice. L'email verrà creata con i campi specificati e il corpo con collegamento ipertestuale elencato all'interno; fai clic sul pulsante Invia per inviarla.

Sblocca la Magia di Excel con Kutools AI

• Esecuzione Intelligente: Esegui operazioni sulle celle, analizza i dati e crea grafici — tutto guidato da semplici comandi.
• Formule Personalizzate: Genera formule su misura per ottimizzare i tuoi flussi di lavoro.
• Codifica VBA: Scrivi e implementa codice VBA senza sforzo.
• Interpretazione delle Formule: Comprendi facilmente formule complesse.
• Traduzione del Testo: Superare le barriere linguistiche all'interno dei tuoi fogli di calcolo.

Potenzia le tue capacità di Excel con strumenti alimentati dall'IA. Scarica Ora ed esperisci un'efficienza mai vista prima!

Articoli correlati