Sending an e-mail with "From" name

[Antonio]

Good morning, all...I am trying to code the sending of an
e-mail and I would like to include the "From" line. The
code I have is:
On Error GoTo Error_Handler

Dim objOutlook As Outlook.Application
Dim objEmail As Outlook.MailItem

Set objOutlook = CreateObject("Outlook.application")
Set objEmail = objOutlook.CreateItem(olMailItem)

With objEmail
.To = txtEmail
.CC = txtAltEmailAddress
.Subject = ""
.body = ""
.Send
End With

Exit_Here:
Set objOutlook = Nothing
Exit Sub

Error_Handler:
MsgBox Err & ": " & Err.Description
Resume Exit_Here

End Sub

Does anybody know? Thanks

 

[Cheryl Fischer]

As far as I know, Outlook does not expose that particular property; it will
automatically use your default account. There is a third-party add-in
named Redemption that, I believe, will allow you to do that.
http://www.dimastr.com/redemption/