vba 如何控制listbox的字号_限制工作表使用日期,谁说你不会VBA

上一次介绍了控制工作的使用时间,今天 我们介绍用VBA限制工作薄的使用日期。

先看效果。

7e4ea5f9f536395f0911d01f39a3b17e.gif

如果是在使用日期内,仅仅是提示你到期时间。如果超出这个时间,工作薄将会自动关闭。

下面我们来看如何设置。

首先设置你限制的日期。

2acb5114b7370f4dfd962118267d787e.gif

设置好后,点击设置结束,这个时候,我们设置日期的工作表会被隐藏,别担心,这个是用代码隐藏,一般的鼠标操作是调不出来的。

这个时候我们就可以使用了,但是有些聪明的人,他们会先把VBA禁止,这样VBA不启动,我们的代码就没意义,那么看下图。

e60110e7eeb3eb9622abf7322371fc8e.gif

这里要注意,当我们关闭工作薄时,我们的多个工作表只留下一个,其它的全部被隐藏,而且这种隐藏用普通操作是显示不出来的,只有通过VBA的代码让他显示,所以。要想正常使用,必须启动VBA代码,这样就达到了我们的目的。

如果设置的日期到了会怎么样。我们看一下。

cc9e0a78c5f730a387b4f455886c2502.gif

当我们把日期设置成以前的日期,这个时候再打开工作薄,会提示日期已到,并且自动关闭工作薄,这样就达到了我们的目的。

当然,我们还有配套的VBA代码,如有兴趣,请找我拿模板。

模板获取:关注并私信我:设置表格使用有效期

关注我,每天提高工作效率

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值