Ik wil de e-mailadressen van de e-mailberichten die ik in het verleden heb ontvangen via VBA uit de Outlook Object ophalen.
Heeft iemand van jullie dit al eerder gedaan en heb je kant-en-klare code liggen waarmee ik dit object onderzoeken?
Ik heb al wat gevonden maar hiermee kom ik er niet.
Dim myolApp As Outlook.Application
Dim myNamespace As Outlook.Namespace
Set myolApp = CreateObject("Outlook.Application")
Set myNamespace = myolApp.GetNamespace("MAPI")
Set myolApp.ActiveExplorer.CurrentFolder = myNamespace.GetDefaultFolder(olFolderInbox)
strEffe = myolApp.ActiveExplorer.CurrentFolder.Description
strEffe = myolApp.ActiveExplorer.CurrentFolder.Folders.Count
Ik zag dat je door de folders kan browsen en ik neem aan dat je zowel het e-mailbericht en dus ook het e-mailadres van verzender kan ophalen.
Heeft iemand van jullie dit al eerder gedaan en heb je kant-en-klare code liggen waarmee ik dit object onderzoeken?
Ik heb al wat gevonden maar hiermee kom ik er niet.
Dim myolApp As Outlook.Application
Dim myNamespace As Outlook.Namespace
Set myolApp = CreateObject("Outlook.Application")
Set myNamespace = myolApp.GetNamespace("MAPI")
Set myolApp.ActiveExplorer.CurrentFolder = myNamespace.GetDefaultFolder(olFolderInbox)
strEffe = myolApp.ActiveExplorer.CurrentFolder.Description
strEffe = myolApp.ActiveExplorer.CurrentFolder.Folders.Count
Ik zag dat je door de folders kan browsen en ik neem aan dat je zowel het e-mailbericht en dus ook het e-mailadres van verzender kan ophalen.