上一次介绍了控制工作的使用时间，今天 我们介绍用VBA限制工作薄的使用日期。
先看效果。
如果是在使用日期内，仅仅是提示你到期时间。如果超出这个时间，工作薄将会自动关闭。
下面我们来看如何设置。
首先设置你限制的日期。
设置好后，点击设置结束，这个时候，我们设置日期的工作表会被隐藏，别担心，这个是用代码隐藏，一般的鼠标操作是调不出来的。
这个时候我们就可以使用了，但是有些聪明的人，他们会先把VBA禁止，这样VBA不启动，我们的代码就没意义，那么看下图。
这里要注意，当我们关闭工作薄时，我们的多个工作表只留下一个，其它的全部被隐藏，而且这种隐藏用普通操作是显示不出来的，只有通过VBA的代码让他显示，所以。要想正常使用，必须启动VBA代码，这样就达到了我们的目的。
如果设置的日期到了会怎么样。我们看一下。
当我们把日期设置成以前的日期，这个时候再打开工作薄，会提示日期已到，并且自动关闭工作薄，这样就达到了我们的目的。
当然，我们还有配套的VBA代码，如有兴趣，请找我拿模板。
扫一扫
1594
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
