如何强制SaveAs而不是Save

I want to prevent user to save the workbook with the same name as it is opened with, and to offer SaveAs option. I want to prevent user to save the workbook wit