Return active email address

[DMT Dave]

Hi guy's is there a method to return the current active email address ?

ie: if an email is minimized from Joe Bloggs

MsgBox(joebloggs@home.com)

If an email is active from Fred Bloggs

MsgBox(fredbloggs@home.com)

Etc

I have nothing to go off at present, just wanted to know if there is an easy way to return the current active email address ?

Kindest

[Gicu]

Hi Dave,

You might want to check out the ActiveInspector:
https://docs.microsoft.com/en-us/off...ctiveinspector

Cheers,
Vlad

[June7]

I have code than can get properties of email selected in Outlook Inbox. No idea how to address minimized mail item.

[DMT Dave]

Thank you guy's i have tried the following but probably without fully understanding, I guess regardless if an active email is maximized or minimized to task bar, i am trying to retrieve the email address from that active mail

Taken from Vlad's link and i have added mail recip in there, i am getting an error saying method or data member not found

 Dim myinspector As Outlook.Inspector 
 Dim myItem As Outlook.MailItem
 Dim myRecip As Outlook.Recipient
 
 Set myinspector = Application.ActiveInspector
 Set myItem = myinspector.CurrentItem
 Set myRecip = myItem.Recipients
    MsgBox (myRecip)
 myItem.Close olSave

[Gicu]

That is because Application in your context refers to the Access application. You need to declare an OutApp variable (Dim OutApp as Outlook.Application), initialize it

 Set OutApp = CreateObject("Outlook.Application")

and use that on that line:

Set myInspector=OutApp.ActiveInspector

Cheers,

[DMT Dave]

Cheers Vlad, run time error51 object variable or with block variable not set ?

 Dim myinspector As Outlook.Inspector Dim outApp As Outlook.Application
 Dim myItem As Outlook.MailItem
 Dim myRecip As Outlook.Recipient
 
 Set myinspector = outApp.ActiveInspector
 Set myItem = myinspector.CurrentItem
 Set myRecip = myItem.Recipients
    MsgBox (myRecip)
 myItem.Close olSave

Debug is Set myinspector line

[Welshgasman]

You have not set outapp yet?��

[DMT Dave]

haha durrr silly billy me thanks wgm

[DMT Dave]

Still getting Run time error 91 object variable or with block variable not set!!!

[Micron]

Is there a "current" item (you remembered to open an email)?

[Gicu]

Dave,
This might help you with checking if you have an item open:
https://stackoverflow.com/questions/...ull-in-outlook
Cheers,