Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Dim Folder As MAPIFolder
- Dim OutlookMail As Outlook.MailItem
- Set objOwner = OutlookNamespace.CreateRecipient("xyz@abc.com")
- objOwner.Resolve
- If objOwner.Resolved Then
- Set Folder = OutlookNamespace.GetSharedDefaultFolder(objOwner, olFolderInbox)
- End If
- For Each OutlookMail In Folder.Items 'here is the doubt
- ...
- ...
- Next
Add Comment
Please, Sign In to add comment