excel定时提醒功能.doc

excel时间提醒功能1、启动excel，新建一文档，取名保存（如“提醒.xls”）。 2、按“alt+f11”组合键进入vba编辑状态。 3、在左侧“工程资源管理器”窗口中，选中“vbaproject(提醒.xls)”选项，执行“插入模块”命令，插入一个新模块。 4、将下述代码输入到右侧的编辑区域中： sub auto_open() 设置一个自动运行的宏auto_open application.ontime timevalue(08:30:00), tx 设置提醒时间08:30:00（可以根据需要修改），设置调用提醒宏tx。 application.ontime timevalue(09:30:00), tx 再设置提醒一次。 end sub sub tx() 设置一个显示提醒消息的宏（名称要与上述自动运行宏中调用的名称一致）。 msg = msgbox(通知张三、李四、王五评委参加下午评标！, vbinformation, 赶快打电话) 设置提醒对话框中的消息和标题（前面是消息内容，后面是对话框标题，请根据需要输入）。 end sub 注意：上述代码中，英文单引号及其后面的字符是对代码的解释，在实际输入时可以不需要。如果设置多个提醒宏（tx1、tx2），并在自动运行宏中分别设置调用的时间，可以实现多个消息的定时提醒。 5、输入完成后，退出vba编辑状态，保存工作簿文档。 6、以后，一上班，就启动excel，打开上述工作簿文档。设定时间一到，系统即刻弹出提示框。现用excel对用户档案进行管理,成交时间和系统当日时间差已经算出,现需用excel自动提醒函数对用户进行分类: 1.时间差等于7天的客户,要求显示回访 2.时间差等于1个自然月的客户,要求显示提醒 3.时间差等于3个自然月的客户,要求显示再次提醒 要求套用excel函数让系统自行根据时间差进行判定,再提醒!如果时间差在f列,提醒内容在g列,公式如下: =if(f1=7,回访,if(f1=30,提醒,if(f1=90,再次提醒,) 将公式向下复制。 可以将g列文字颜色设为红色。如果您从事设备管理工作，有近千台机械设备需要定期进行精度检测，那么，就得每天翻阅“设备鉴定台账”来寻找“到期”的设备实在是太麻烦了！用excel建立一本“设备鉴定台账”是不是方便得多？方法是：用excel的if函数嵌套today函数来实现设备“到期”自动提醒。 首先，运行excel，将“工作簿”的名称命名为“设备鉴定台账”，输入各设备的详细信息、上次鉴定日期及到期日期（日期的输入格式应为“年-月-日”，如：2003-10-21，如图1）。然后，选中图1所示“提示栏”下的f2单元格，点击插入菜单下的函数命令，在“插入函数”对话框中选择“逻辑”函数类中的if函数，点击确定按钮，就会弹出“函数参数”对话框，分别在logical_test行中输入e2=today()、value_if_true行中输入“到期”、value_if_false行中输入“ ”(如图2)，并点击确定按钮。这里需要说明的是：输入的 是英文输入状态下的双引号，是excel定义显示值为字符串时的标识符号，即if函数在执行完真假判断后显示此双引号中的内容。为了醒目，可在“单元格属性”中将f2单元格的字体颜色设置为红色。最后，拖动“填充柄”，填充f列以下单元格即可。 我们知道excel的if函数是一个“条件函数”，它的语法是“if(logical_test,value_if_true,value_if_false)”，具体地说就是：如果第一个参数logical_test返回的结果为真，则执行第二个参数value_if_true的结果，否则执行第三个参数value_if_false的结果；excel的today函数语法是today()是返回当前系统日期的函数。 实际上，本文所应用的if函数语句为if(e2=today(),到期,)，解释为：如果e2单元格中的日期正好是today函数返回的日期，则在f2单元格中显示“到期”，否则就不显示，today函数返回的日期则正好是系统当天的日期。excel的到期提醒功能就是这样实现的。我要做一个表（excel）我要在表的e列里面写上日期，而要在f列里面列出还差多少天，如果是过期了，则列出已经过期几天。望各位帮忙。=if(e27today(),已过期&datedif(today(),e27,d)&天,if(e27=today(),今天到期,还有&datedif(e27,today(),d)&天)不用呀，直接用公式加条件格式就可以完成了呀 增加一列（如f列）用公式