世界上最重要的是什么?是我们的身体健康。
谁最关心你的身体?当然是你亲妈。
但,亲妈也不能时时刻刻跟着你,这时候你需要有一个这样的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
MsgBox "宝贝儿,该休息时间了!" & arr(x + 1) & "再回来工作!", , "你的健康管家"
End If
Next x
End Sub
2、添加代码
复制已设置休息时间的代码,工作表标签右键菜单 - 查看代码,双击新弹出窗口中的Thisworkbook,把代码粘贴在右侧的代码框中。然后关闭弹出的VBA窗口。
3、另存文件
按F12弹出另存为窗口,把文件类型修改为启用宏的文件类型。
注:如果你想修改或停止休息提示,同上操作修改时间或删除代码即可。
兰色说:今天用的是VBA的事件程序,它可以根据你的操作对Excel表格进行自动监测。很多同学问VBA难学吗?需要什么基础。兰色这里一并回答:不需要基础,认真学一个月即可入门。
领取专属 10元无门槛券
私享最新 技术干货