VB code to email at File Save is nnot auto-running

Hello, all,

I hate to rehash this old message, but since Microsoft never stops messing with things, I suppose threads like this will never die. Maybe my version of Excel has those "extras" :) I am using Office Pro Plus 2010.

I put the code above in a module (Alt-F11), Module 1 and saved my Workbook as a .xlsm file so macros would be enabled. When run File -> Save nothing happens. How do I get this code to auto-run at File -> Save? What other things do I need to check? If I try and run it (F5) in the VB Editor it wants me to give it a Macro Name. I thought this code was suppose to run automatically at File -> Save. Any ideas?

UPDATE:

Ummm. I thought I was updating an old thread. This thread is related to the code located at:
https://ccm.net/faq/27784-excel-be-notified-by-mail-when-shared-workbook-is-updated