Como enviar um e-mail com formatação de texto em negrito/tamanho/cor/sublinhado específico no Excel?
O formato de corpo em HTML pode enriquecer o e-mail e facilitar a leitura. Este artigo discute como enviar um e-mail com corpo de e-mail no formato HTML no Excel, adicionando negrito, sublinhado, bem como tamanho e cor de texto específicos.
Enviar e-mail com formatação de texto em negrito/tamanho/cor/sublinhado específico com código VBA
Enviar e-mail com formatação de texto em negrito/tamanho/cor/sublinhado específico com código VBA
Por favor, aplique o código VBA abaixo para enviar um e-mail com um formato de corpo HTML específico no Excel.
1. Pressione simultaneamente as teclas Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.
2. Na janela Microsoft Visual Basic for Applications, clique em Inserir > Módulo. Em seguida, copie o código VBA abaixo na janela Código.
Código VBA: Enviar e-mail com formatação específica de negrito/tamanho/cor/sublinhado 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
Observações:
3. Pressione a tecla F5 para executar o código. Em seguida, o e-mail com o corpo no formato HTML especificado será aberto. Clique no botão Enviar para enviá-lo.
Envie facilmente e-mails pelo Outlook com base nos campos da lista de envio criada no Excel:
O Enviar Emails utilitário do Kutools para Excel ajuda os usuários a enviar e-mails pelo Outlook com base na lista de envio criada no Excel.
Baixe e experimente agora!
Artigos relacionados:
- Como enviar automaticamente um e-mail 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 o Outlook no Excel?
- Como enviar um gráfico específico em um e-mail 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 para Office
Potencialize suas habilidades no Excel com o Kutools para Excel e experimente uma eficiência sem igual. O Kutools para Excel oferece mais de300 recursos avançados para aumentar sua produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
O Office Tab traz interface com abas para o Office e facilita muito o seu trabalho
- Habilite a edição e leitura com abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas abas na mesma janela, em vez de abrir novas janelas.
- Aumente sua produtividade em50% e reduza centenas de cliques do mouse todos os dias!