You have the macro code in ThisOutlookSession. I said you should create a new module - Module1 seems to be that new module. The code should go in there.
With respect to the second message (I assume that is what you meant) did you select it before running the first macro, or did you run the second macro? One runs with the selected message, the other with the contents of the folder selected from the dialog box offered by the macro.
However the second macro includes a userform progress indicator which I forgot to mention.

Sorry about that.
You can download the userform from
http://www.gmayor.com/Forum/frmProgress.zip and import it into the VBA editor.