Hello,
Is there a way to move(not copy) a specific mail from one custom folder to another customfolder?
Does someone know? Any input would be great!
Printable View
Hello,
Is there a way to move(not copy) a specific mail from one custom folder to another customfolder?
Does someone know? Any input would be great!
Now, where are the proffesionals here? Can anybody help me out?
This code will move all of the mail items from the Inbox to the Personal Mail box where the Sender Name is 'Bob'
Code:Set myInbox = myOlApp.GetDefaultFolder(olFolderInbox)
Set myItems = myInbox.Items
Set myDestFolder = myInbox.Folders("Personal Mail")
Set myItem = myItems.Find("[SenderName] = 'Bob'")
While TypeName(myItem) <> "Nothing"
myItem.Move myDestFolder
Set myItem = myItems.FindNext
Wend
Thanks again Ishamel.