New Mail (From Field)

[Mopsy1]

I am trying to create a new Outlook Mail Item from VBA (in excel). But I can't populate the from field. In my organisation I have access to other peoples mailbox's and send mail from their name by typing there name into the from box. I just cant seem to do it programatically. The code I am using is:

*Outlook 2002***Excel 2002***VBA
~~~~
ActiveWorkbook.SaveAs sNewFileName
ActiveWorkbook.Close

Set App = CreateObject("Outlook.Application")
Set Itm = App.CreateItem(0)
With Itm
.Subject = ESubject
.To = SendTo
.CC = CCTo
.Body = Ebody
.Attachments.Add (sNewFileName)
.Display
.send
End With

Set App = Nothing
Set Itm = Nothing
Kill sNewFileName
~~~

I have tried .From = and .SendersName = and it throws up an error.

Any help would be much appreciated

Tim

 

[mintjulep]

SendOnBehalfOf

 

[Mopsy1]

Thanks a lot for helping.

That still didn't work but .SentOnBehalfOfName did work.

Thanks Again for pointing me in the right direction.

 

[mintjulep]

Pretty close from memory considering I last used it four years ago.