Página 1 de 1

Preciso dar destaque(background(?)) a uma variavel String no corpo de um e-mail

Enviado: Qui Set 24, 2020 5:13 pm
por VFerr
Boa tarde, tenho uma macro que envia e-mails automaticamente, a variavel data foi declarada como string, referenciada na planilha, e eu necessito destacar ela dessa forma: 24/09/2020 (amarelo e em negrito) isso em CÓDIGO VBA, alguém poderia me dar uma ajuda nisso? Já pesquisei mas não encontrei em nenhum lugar. Segue abaixo algumas linhas de código que possui a "data" para ficar explicito como estão as declarações.

Dim data As String (como foi declarada)
data = Range("a20").Value (onde está referenciada)
" referente a data " & data & "." & _ ( como está no corpo do e-mail)

Re: Preciso dar destaque(background(?)) a uma variavel String no corpo de um e-mail

Enviado: Qui Set 24, 2020 7:52 pm
por Raygsson
Voce consegue aplicar formatações tratando o conteúdo do e-mail como HTML e estilos CSS. Segue um Exemplo:

Código: Selecionar todos

Sub Email() 

    Dim objOL As New Outlook.Application

    Dim objMail As MailItem

    Set objOL = New Outlook.Application

    Set objMail = objOL.CreateItem(olMailItem)

    Dim data As String, texto As String      
       

    data = "24/09/2020"

    texto = "<HTML><p>Exemplo de data com formatação via HTML/CSS: <span style='background-color:yellow; font-weight:bold'>" & data & "</span></p></HTML>"
    

    Set objMail = objOL.CreateItem(olMailItem)

    With objMail

        .SentOnBehalfOfName = "remetente@gmail.com" 'remetente

        .To = "destinarario@gmail.com" 'destinatário

        .Subject = "exemplo" ' assunto

        .BodyFormat = olFormatHTML 'formato do texto

        .HTMLBody = texto ' conteudo do texto

        .display

    End With    
                    

    Set objMail = Nothing

    Set objOL = Nothing
 

End Sub