From msAccess find correct email account in outlook
Access 2010 vba
outlook
What Am I trying to do:
Trying to perform a search in the correct "Inbox"
First. : When i open my outlook I have several Profiles under my Primary profile
>fordraiders@zzzz.com
Inbox
>bluebook
Inbox
>redbook
Inbox
I tried to access the profile directly but it still only searches in the main "InbOx" (fordraiders@zzzz.com)
Before I perform a search I need to make sure I'm looking in the correct profile ?
before i execute any code..
I'm trying to loop through each profile but this is not working ?
' LOOK FOR OUTLOOK OPEN
Dim objOL As Outlook.Application
Dim myOlApp As New Outlook.Application
Dim myNameSpace As Outlook.Namespace
Dim myInbox As Outlook.MAPIFolder
Dim myitems As Outlook.Items
Dim myitem As Object
Dim objInsp As Outlook.Inspector
Dim oAccount As Outlook.Account
For Each oAccount In myOlApp.Session.Accounts
If oAccount = "redbook" Then
' code here
end if
next
That was it ...even my admin for outllok kept calling them profiles. I knew their had to be a specific profile name under current session "Stores"...Phew..
That worked.. had to change a set statement but it listed the stores(profiles).
Dim colStores As Outlook.Stores
Dim oStore As Outlook.Store
Dim oRoot As Outlook.folder
Set colStores = Outlook.Application.Session.Stores
Open in new window
and check from the watch window what properties and methods are available...maybe it needs a different approach...