![]() If OutApp Is Nothing Then Set OutApp = CreateObject("Outlook. ![]() Set OutApp = GetObject(, "Outlook.Application") ' Get open Outlook, or create a new instance Might also look at Get sender's email address with Excel VBA Sub TestCC() This was resolved successfully, and successfully CC'd the sender. The address returned a string like the following: /o=ExchangeLabs/ou=Exchange Administrative Group (XXXXXXXXXXXXXXXX)/cn=Recipients/cn=XXXXXXXXXXXXXXXXXXXXXXXXXXXXX-XXXXXXX You can use it, for instance, to do small mailing campaigns, as besides sending mass emails it lets you manage recipients lists, blacklists, and user profiles schedule emails in intervals create and edit customizable templates, etc. I was able to get the sender CC'd using the namespace (at least in an exchange environment). SmartSerialMail is a tool that sends emails to many recipients simultaneously. Then you can get the Address property value which representing the e-mail address of the Recipient. I know this is kind of old, but I ended up here, so someone else might! You can use the CurrentUser property of the Namespace class to get the currently logged-on user as a Recipient object. Set OutApp = CreateObject("Outlook.Application") IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False StrPath
0 Comments
Leave a Reply. |