MyPSTInbox has point to the Inbox in your local PST, not your default Inbox (the one on the Exchange server).

[vba]Set MyPSTInbox = GetNS.Folders("Mailbox - Your Name").Folders("Inbox")[/vba]

You have to physically look at your mailbox name in the folder tree ("Mailbox - Your Name") and see what it says, and edit the above line accordingly. For example mine says "Mailbox - Jimmy Pena" so that line (for me) would be

[vba]Set MyPSTInbox = GetNS.Folders("Mailbox - Jimmy Pena").Folders("Inbox")[/vba]