Excel 2010 - Force to save as .xlsm file

Hi,

I have an Excel 2010 file containing macros and Users often lose them by saving as .xlsx files. How can I stop this using VBA code?

Many thanks.