Guest User

Untitled

a guest
Nov 22nd, 2017
59
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.15 KB | None | 0 0
  1. For Each olItem In olFolder.Items
  2. On Error Resume Next
  3. If olItem.MessageClass = "IPM.Note" Then
  4. Set olMail = olItem
  5. Debug.Print olMail.Parent
  6. ...
Add Comment
Please, Sign In to add comment