打开APP
userphoto
未登录

开通VIP,畅享免费电子书等14项超值服

开通VIP
比亲妈还心疼你,这个Excel表格我喜欢 !

世界上最重要的是什么?是我们的身体健康。

谁最关心你的身体?当然是你亲妈。

但,亲妈也不能时时刻刻跟着你,这时候你需要有一个这样的Excel表格:

如上图所示。只要你预设置好休息的时间,然后Excel就会自动管理你休息时间:工作时间可以正常使用Excel,但休息时间你是无法操作表格的

为了能让同学们管理好自已的工作时间,兰色用VBA编写了一小段代码,只需几步复制粘贴,你也可以为自已的Excel表格添加一个健康小管家了。

添加步骤:

1、设置休息时间

在下面代码中,array后的括号内添加时间,红色为开始休息时间,蓝色为休息结束时间,中间用逗号隔开。设置的数量不限。


Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)

Dim arr, T

arr = Array('7:00', '7:15', '8:00', '8:25', '9:00', '9:10')

T = Format(Time, 'h:mm')

For x = 0 To UBound(arr) Step 2

  If T > arr(x) And T < arr(x + 1) Then

    MsgBox '宝贝儿,该休息时间了!' & arr(x + 1) & '再回来工作!', , '你的健康管家'

  End If

Next x

End Sub


2、添加代码

复制已设置休息时间的代码,工作表标签右键菜单 - 查看代码,双击新弹出窗口中的Thisworkbook,把代码粘贴在右侧的代码框中。然后关闭弹出的VBA窗口。

3、另存文件

按F12弹出另存为窗口,把文件类型修改为启用宏的文件类型。

注:如果你想修改或停止休息提示,同上操作修改时间或删除代码即可。

兰色说:今天用的是VBA的事件程序,它可以根据你的操作对Excel表格进行自动监测。很多同学问VBA难学吗?需要什么基础。兰色这里一并回答:不需要基础,认真学一个月即可入门。

本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报
打开APP,阅读全文并永久保存 查看更多类似文章
猜你喜欢
类似文章
【热】打开小程序,算一算2024你的财运
Excel中常用的35个Ctrl快捷键, 全在这儿了
禁止别人复制你的Excel表格只需一步。可惜99%的人都不会
口 内打 √, “一键全选” 的Excel智能表格来了!
老板发来一堆Excel表格要改名,崩溃了!
EXCEL VBA用For Each给表格加目录
你加班1小时做Excel表格,我用VBA只需1分钟!
更多类似文章 >>
生活服务
热点新闻
分享 收藏 导长图 关注 下载文章
绑定账号成功
后续可登录账号畅享VIP特权!
如果VIP功能使用有故障,
可点击这里联系客服!

联系客服