如何将这段代码添加到你的Excel文件中： 打开你的Excel文件。 按 Alt + F11 打开VBA编辑器。 在左侧的“项目资源管理器”窗口中，找到并双击“ThisWorkbook”对象。 将上述代码粘贴到右侧的代码窗口中。 关闭VBA编辑器，返回Excel。 保存你的工作簿为启用宏的工作簿格式（.xlsm）。 这样，每次打开该工作簿时，都会自动运行上述代码，检查当前日期是否在设定的有效期内。如果不在，将会弹出一个温馨的提示信息，要求用户联系管理员获取今日的密钥。然后，会弹出一个对话框要求用户输入密钥。如果用户连续三次输入错误的密钥，工作簿的所有工作表内容将被清空，并关闭工作簿。

源码下载：http://fsgm.ysepan.com/ 到【设计由我创】

如果你专门用Excel开发些实用操作的，想变“米”可以用得，或者在公司想保留自已的版本也用得上，我最近制作一个医保管理系统，也有版本及版权的，其他部门要用给“米”才行。每个人的劳动果实只能分享不共享。现在是分享现时代，共享时代过去了。