Hi Team, Please help..
Hi Team, Please help..
Here's an example I use from Excel that combines multiple strings to form dynamic To, Body, and Signature.
![]()
Sub Fluffypuff() Dim OutApp As Object Dim OutMail As Object Dim strBody As String Dim strOpener As String Signature = "<font color=002395><b>Captain Bananas <br>" & _ "</b></font>" strCloser = "I am somewhat nifty." strBody = "<font face=""Arial""> Bob,<br><br><br>" & strOpener & _ strCloser & "<br><br>Thanks,<br>" & Signature Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(0) With OutMail .to = "themuffinman@drearylane" .Subject = "Do you know the muffin man?" .HTMLbody = strBody .Display End With Set OutApp = Nothing Set OutMail = Nothing End Sub
Make Mom proud: Add to my reputation if I helped out!
Make the Moderators happy: Mark the Thread as Solved if your question was answered!
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks