Views

Histats

Vitrine

VBA Outlook - Inserindo assinatura no e-mail com ou sem imagem - Insert Outlook Signature in mail


A maneira mais fácil de adicionar a assinatura padrão com ou sem foto num e-mail com código VBA.

Há problema quando for enviar o email diretamente. Verá a tela piscar porque mostramos o e-mail por um curto período de tempo antes do código enviá-lo.

Isso pode não ser nenhum problema se quiser conferir o e-mail antes de enviá-lo, mas num looping isso não será tão agradável.

Não há uma forma melhor de enviar uma assinatura com uma imagem diretamente num e-mail sem mostrá-lo por um tempo curto.

O segundo exemplo não terá este problema, mas não poderá lidar com uma assinatura com uma imagem nele.

Sub MailOutlookWithSignatureHtml01()
' Working in Office 2000-2013
    Dim OutApp As Object
    Dim OutMail As Object
    Dim strbody As String

    Set OutApp = CreateObject("Outlook.Application")
    Set OutMail = OutApp.CreateItem(0)

    Let strbody = "<H3><B>Cara Cliente Ana Cláudia</B></H3>" & _
              "Queira, por favor, visitar o nosso website e fazer um download da nossa nova versão.<br>" & _
              "Caso ocorra algum problema, deixe-nos cientes disso.<br>" & _
              "<A HREF=""http://inanyplace.blogspot.com/"">A&A - In Any Place</A>" & _
              "<br><br><B>Thank you</B>"

    On Error Resume Next

    With OutMail
        Let .Display
        Let .To = "bernardess@gmail.com"
        Let .CC = ""
        Let .BCC = "bernardess@gmail.com"
        Let .Subject = "A&A: Teste de envio de e-mail"
        Let .HTMLBody = strbody & "<br>" & .HTMLBody
        Let .Send
    End With

    On Error GoTo 0

    Set OutMail = Nothing
    Set OutApp = Nothing
End Sub



brazilsalesforceeffectiveness@gmail.com

✔ Brazil SFE®Author´s Profile  Google+   Author´s Professional Profile   Pinterest   Author´s Tweets



✔ VBA Brazil®

✔ VBA Brazil®
brazilsalesforceeffectiveness@gmail.com
Related Posts Plugin for WordPress, Blogger...
diHITT - Notícias