发布网友 发布时间:2022-05-06 23:25
共2个回答
热心网友 时间:2023-10-05 13:26
按ALT+F11进入宏编辑器,在工程窗口的“个人宏工作簿”(PERSONAL.XLS)下面双击“ThisWorkbook",右边出现代码窗口,点“通用”旁边的倒三角,选“Workbook”出现Open事件,编入如下代吗: Private Sub Workbook_Open() Call 计时器 End Sub (注:如果没有个人宏工作簿,用录制方法创建一个。) 然后,插入/模块,在模块中复制如下代码: Sub 计时器() Application.OnTime Now + TimeValue("00:20:00"), "提醒" End Sub Sub 提醒() msg = MsgBox("别忘了还有事情没做!" & Chr(13) & "选择“是”,每二十分钟提醒一次。" & Chr(13) & "选择“否”,将不再提醒。", vbYesNo) If msg = vbNo Then Exit Sub Call 计时器 End Sub 保存,关闭文件。再打开文件就会有提醒功能了。希望对你有用.小姚影视 www.xyys.uqc.cn热心网友 时间:2023-10-05 13:27
你的提醒是指什么???是声音?是对话框?还是单元格信息? 但总之有一条,无论是什么,你得保证你的工作表是被激活的状态。 说个最简便的方法,那就是单元格信息提示:(C2单元格公式) A B C 1 培训计划 培训日期 提醒 2 UG培训 2005-11-24 =IF(B2>TODAY(),"距离"&A2&"还有"&DATEDIF(TODAY(),B2,"d")&"天",IF(B2<TODAY(),A2&"时间已过","注意:今天是"&A2)) 这样,每天早上打开电脑,并打开该工作表,就可以在C列看到各培训计划时间情况。为了更醒目,可以为C列设置条件格式。比如包含有“注意”字样的单元格字体颜色为红色加粗,包含“距离”的为蓝色