Como enviar e-mail com o formato de texto em negrito / tamanho / cor / sublinhado especificado no Excel?
O formato do corpo em HTML pode enriquecer o e-mail e torná-lo fácil de ler. Este artigo está falando sobre como enviar um e-mail com o corpo do e-mail no formato HTML no Excel, adicionando negrito e sublinhado, bem como o tamanho especificado e formato de texto colorido.
Enviar e-mail com o formato de texto em negrito / tamanho / cor / sublinhado especificado com código VBA
Por favor, aplique o código VBA abaixo para enviar um e-mail com formato de corpo HTML específico no Excel.
1. aperte o outro + F11 simultaneamente para abrir o Microsoft Visual Basic para Aplicações janela.
2. No Microsoft Visual Basic para Aplicações janela, clique em inserção > Módulo. Em seguida, copie o código do VBA abaixo para a janela de código.
Código VBA: enviar e-mail com formato de texto em negrito / tamanho / cor / sublinhado específico no Excel
Sub SharePerformance1()
'Update by ExtendOffice 2018/3//5
Dim xOutApp As Object
Dim xOutMail As Object
Dim xOutMsg As String
On Error Resume Next
Set xOutApp = CreateObject("Outlook.Application")
Set xOutMail = xOutApp.CreateItem(0)
xOutMsg = "<b>This text is bold</b><br/><span style=""color:#80BFFF"">Font Color</span style=""color:#80BFFF""><br />" & _
"<u>New line with underline</u><br /><p style='font-family:calibri;font-size:25'>Font size</p>"
With xOutMail
.To = "Email Address"
.CC = ""
.BCC = ""
.Subject = "Html format email"
.HTMLBody = xOutMsg
.Display
End With
Set xOutMail = Nothing
Set xOutApp = Nothing
End Sub
Notas:
3. aperte o F5 chave para executar o código. Em seguida, o e-mail com o corpo de formato HTML especificado é aberto. Por favor clique no ENVIAR botão para enviá-lo.
Envie e-mails facilmente pelo Outlook com base nos campos da lista de e-mails criada no Excel:
A Mande emails utilidade de Kutools for Excel ajuda os usuários a enviar e-mail através do Outlook com base na lista de mala direta criada no Excel.
Baixe e experimente agora! (trilha gratuita de 30 dias)
Artigos relacionados:
- Como enviar e-mail automaticamente com base no valor da célula no Excel?
- Como inserir assinatura no e-mail do Outlook ao enviar por vba no Excel?
- Como enviar e-mail sem Outlook no Excel?
- Como enviar um gráfico específico em um email com vba no Excel?
- Como enviar um e-mail em um horário específico do dia no Excel?
- Como enviar e-mail com corpo de e-mail em HTML no Excel?
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!