excel表如何提示到期

1.excel表格中如何设置日期到期自动提醒?

1、将Excel表格打开，在A1-D1单元格里输入需要的文字。比如：入职时间，到期时间，是否需要到期提醒，试用期提醒

2、在A2单元格里输入新员工的入职时间，比如：2008/5/8的格式

3、已经知道入职的准确时间后，我们在B2的单元格里利用输入公式快速计算出一个月试用期的到期时间。

4、把计算出来了到期时间向下填充，这样就不用一个一个去输入了，还可以避免日期输入错误。

5、在C2的单元格里输入公式查看一下是否需要到期提醒。=AND到期时间，减去今天的时间，小于等于15，到期时间减去今天的时间大于等于0。

6、把C2单元格的内容向下填充，这个时候我们看到有两种情况，分别是FALSE和TRUE。FALSE是已过期，TRUE是要提醒。

7、在试用期提醒的D2单位元格里，用IF=AND到期时间，减去今天的时间，小于等于15，到期时间减去今天的时间大于等于0，到期时间减去今天的时间已过期。

8、最后，把已过期的填充为红色，需要提醒的内容填充上一个比较醒目的颜色，加上表格边框就更完成了。

2.请问如何在EXCEL表格中设置日期到期前的提醒?请高手赐教,我希

在excel中设置到期自动提醒，可以利用excel中的函数datedif来设置。

方法如下： 如图，在B2单元格输入公式：=IF(DATEDIF(A2,TODAY(),"d")>0，"还有"&DATEDIF(A2,TODAY(),"d"）&"天到期"，"已到期"）。 公式解析：DATEDIF(A2,TODAY(),"d"）该公式用来计算日期列和今天相距的时间是多少天，DATEDIF函数，第一个参数是起始日期，第二个参数是结束日期，第三个参数是计算的结果返回的是天数、年数、还是月数。

用if函数判断一下，如果是大于0的就是没有到期的，那么返回”还有多少天到期“，到期的显示”已到期“，实现了自动判断。 注意，today函数是易失性函数，就是每天打开文件保存一下，值才会更新，另外today函数的返回值取决于计算机的系统日期，如果系统日期设置不正确，那么today函数的取值也不正确。

我帮你设置后再发给你，397525753@QQ。 COM。

3.excel中如何设置excel表格到期后不能使用?

excel中如何设置excel表格到期后不能使用？要运用VBA去解决。

一、模板展示这个表格可使用的时间是一个月，当期后便不能使用，为了方便起见，我将当前时间改为到期时间，看下效果。以上模板可实现表格到期后，不能使用。

二、制作步骤1、初始数据准备：初始时间，当前时间，到期时间，限制时间，可根据自己的要求调整限制时间。 2、时间自动更新：调出VBA窗口，插入一个模块，复制粘贴以下代码：3、到期判断，调出VBA窗口，复制粘贴以下代码：4、最后设置宏的保护密码即可三、总结以上模板可实现表格到期后，便不能对表格进行相关操作。

主要思路是，时间与初始的时间进行计算，与到期时间进行判断，大于或者等于到期时间，便关闭表格，当让您也可以通过代码实现删除表格。 如果您想要获取这个模板做练习，请帮忙转发出去，关注我，私信“到期”即可。

更多干货小技巧，请关注我，谢谢您！#####看到各位老师的回答都是VBA方法。今天雷哥给大家分享1种方法-条件格式问题分析：到期后表格不能使用，即到期后打开Excel表格，无法看到数据即可。

具体方法如下step1： 选中数据，单击【条件格式】——【新建规则】；step2： 在新建格式规则中，单击【使用公式确定要设置格式的单元格】，输入公式=today()-$F$6>0;step3： 单击格式——自定义——类型输入【；；；】即可解释： 当满足这个 today()-$F$6>0 条件时，工作表中的数据就无法显示了。 最后把F列数据设置为无法编辑即可哈。

~ 这样到期后，数据表格就无法使用啦~~~为了让大家看的更加清晰明了，雷哥进行了案例解释：今天是05-12，因此today（) 就表示5-12① 如果F6为 2019-05-11， 那么满足today()-$F$6>0 条件，因此数据无法显示；②如果F6为2019-05-13， 那么今天不满足today()-$F$6>0 ，因此数据可以显示，后天（2019-05-14）开始，数据就无法显示了。 写了这么多，大家学会了吗？ 如果有任何问题，欢迎及时沟通交流哈~~~雷哥：自媒体【雷哥office】创始人，《竞争力：玩转职场Excel，从此不加班》作者，微软Excel专家认证，office培训师，职场老司机，分享职场经验 / 办公技能 / 提高职场效率#####其实并不难，通过VBA可以实现，我近期正在分享相关的内容，上下代码Private Sub Workbook_Open（)#####题主，你好！我曾在自己做的数据分析系统中，通过vba来实现过这个功能。

我做此功能的目的，主要是我要为数据系统不断升级更新，我是不允许写着自己名字的表格存在低效率、甚至低级错误的。设置有效期的话，就可以让用户手里拿到的永远是最高级的系统，你最精华的成品。

好，闲言少叙，开始上菜~~~~我的思路是：给工作簿设定一个日期，如果系统日期晚于设定日期，那么工作表全部删除，留下一个空表让用户想想~~~~以上代码在thisworkbook 的open事件中，直接call就可以啦建议你自己写一遍，这样就能会了。 也可以私信我“表格自毁代码”，我会在晚上处理当天的留言。

最后：重要的事情说三遍，编写以上代码之前，请务必备份，俗话说数据无价，悔之晚矣。编写以上代码之前，请务必备份，俗话说数据无价，悔之晚矣。

编写以上代码之前，请务必备份，俗话说数据无价，悔之晚矣。 欢迎大家再评论区一起讨论研究~~~#####没有绝对的到期后不能使用。

如果单纯从EXCEL应用角度来说，无法通过软件设置来达到到期就无法使用的目的。如果EXCEL是启用了宏的，里面的功能是通过VBA来实现的那么倒是有个变通的方法：在VBE的thisworkbook的打开事件OPEN中加入如下代码：Private Sub Workbook_Open()If Date >= #7/20/2018# ThenWith ThisWorkbook。

Saved = True。ChangeFileAccess xlReadOnlyKill 。

FullName。CloseEnd WithEnd IfEnd Sub然后你保存后再打开试试效果。

最好试之前保存一下工作簿备份，万一删除了，可不好恢复。 资料无价。

4.excel表格中如何自动弹出提示对话框

利用VBA可以实现，请在Excel表的Open事件中添加如下代码：

Private Sub Workbook_Open()

Dim i As Long

Dim j As Long

For i = 2 To Sheet1.Range("G65536").End(xlUp).Row

If Sheet1.Range("G" & i) = "2013-05-01" Then

MsgBox i &； "行到期"

End If

Next

End Sub

参考来源：Yes黑客联盟