Macro to Copy an Outlook message to another folder

A user had this question: I want to do the following: 1. Copy a message from one public folder to another public folder 2. Mark the original message as read 3. Mark the original Complete 4. Add a Category to it A Quick Step will categorize the e-mail first (it has a higher priority) and