I did try but it gives an error at the line bolded as, "An Object could not be found"
Set myNameSpace = Application.GetNameSpace("MAPI") Set myFolder = myNameSpace.GetDefaultFolder(olFolderInbox) Set olFolder = MYFolder.Folders("Misc")
I did try but it gives an error at the line bolded as, "An Object could not be found"
Set myNameSpace = Application.GetNameSpace("MAPI") Set myFolder = myNameSpace.GetDefaultFolder(olFolderInbox) Set olFolder = MYFolder.Folders("Misc")