Excel能设定时间提醒吗?时间到在桌面自动提醒
展开全部
1.如下图,在A2单元格输入=TODAY(),该函数自动返回当前的日期。每次打开工作簿时都会自动更新。
2.双击C2单元格,输入函数:
=IF(B2-A2<=10,"提醒","")
这时,如果B2的日期减去A2的日期(也就是今天的日期)小于等于10时,C2单元格会返回“提醒”二字,否则返回空白。
3.尝试更改A2单元格的日期会发现公式返回结果的变化。
注意:excel里两日期相减得到的天数相当于“算头不算尾”的方法,比如说明天的日期减去今天的日期返回结果是1。
4.如果不想加C列显示,只想在B列快到期时自动添加颜色显示也可以用条件格式完成。
首先,选中B2单元格,选择【开始】-【条件格式】-【新建规则】。
5.在【新建规则】界面如下图选择【使用公式确定要设置格式的单元格】。
6.在下面的输入框内输入公式=B2-TODAY()<=10,然后点击【格式】按钮。
7.在【格式】选项卡选择一个合适的填充色后返回前一界面点击确定。这样,当B2的日期减去电脑系统时间小于等于10天的时候,单元格就会被填充上刚才选中的颜色。
展开全部
用VBA吧:
Sub auto_open() '设置一个自动运行的宏--auto_open
Application.OnTime TimeValue("11:00:00"), "tx"
'设置提醒时间为11:00:00(可以根据实际需要进行修改),设置调用提醒宏
Application.OnTime TimeValue("11:05:00"), "tx" '再设置提醒一次。
End Sub
Sub tx() '设置一个显示提醒消息的宏。
Application.WindowState = xlNormal '显示本表
msg = MsgBox("时间到!", vbInformation, "提示")
End Sub
Sub auto_open() '设置一个自动运行的宏--auto_open
Application.OnTime TimeValue("11:00:00"), "tx"
'设置提醒时间为11:00:00(可以根据实际需要进行修改),设置调用提醒宏
Application.OnTime TimeValue("11:05:00"), "tx" '再设置提醒一次。
End Sub
Sub tx() '设置一个显示提醒消息的宏。
Application.WindowState = xlNormal '显示本表
msg = MsgBox("时间到!", vbInformation, "提示")
End Sub
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
一般情况下不能,因为EXCEL时间的计算更新必须手动F9更新,即使用函数或者VBA来确定时间还是不会自动更新的。不知道有没有高人可以VBA做到...
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询