Excel表格怎么设置标准/合同到期自动弹出提醒?

office教程网 2024-09-30 02:43:51

默认

后台-系统设置-扩展变量-手机广告位-内容正文顶部

摘要：

合同的日期报关很重要，有些合同到期了就需要续签合同，如果错过日期就会出现问题，这时候我们就可以在excel中设置弹出提示框提示标准、合同将到期，下面分享这个功能的实现方法

大家在使用Excel统计时，常常会涉及一个标准、合同等等什么时候到期，同时需要在起到期前**天修订核准。那可以用Excel来实现在打开该表格时，弹出提示框提示标准于***到期，避免错过截止日期。

1、打开Excel表格后，按Alt F11，打开VBA编辑器

2、双击左侧工程里面的ThisWorkbook，然后选择代码窗口里的workbook和open

3、然后输入以下代码，关键地方已备注，按自己要求修改即可。

复制内容到剪贴板

Private Sub Workbook_Open()
dim v,s,n as Date
v = Application.WorksheetFunction.Max(Range("B2:B20")) 'C2:C20为要审查的单元格
For Each s In Range("C2:C20")
n = Date '获取当前日期
If s > n And s < n 60 Then ' 设置到期60天时提醒
If v > s Then
v = s
End If
End If
Next
MsgBox "有产品于" & v & "到期，请及时修订！"
End Sub

4、确认，保存。关闭当前工作簿，再次打开，就会看到到期提示啦。

注意事项：Excel表格中日期的单元格要以日期形式设置。

相关推荐：

excel中怎么利用dateif函数计算两个日期参数的差值?

Excel如何创建添加图表(新数据列)?
Excel是大家经常会用到的一款办公软件，当数据比较多的时候，我们该如何让数据更直观的表现出来呢？那么Excel如何创建添加图表(新数据列)?下面小编就为大家详细介绍一下，来看看吧

excel理日期数据怎么计算？excel灵活处理日期数据的两种方法

上一篇：如何录制宏?Excel如何录制并运行宏? 下一篇：Excel如何创建添加图表(新数据列)?

Excel教程 Excel表格下拉列表怎么设置
Excel表格下拉列表怎么设置呢？很多用户对此还不是很清楚，小编这里就给大家带来有关Excel表格下拉列表怎么设置的回答，希望能够对大家有所帮助。......

2023-01-18
详细阅读
Excel教程 Excel如何打印选定区域
Excel如何打印选定区域呢？很多用户对此还不是很清楚，小编这里就给大家带来有关Excel如何打印选定区域的回答，希望能够对大家有所帮助。......

2023-01-18
详细阅读
Excel教程 Excel怎么设置英文首字母大写
Excel怎么设置英文首字母大写？Excel中输入英文首字母大写怎么操作？当我们需要将Excel表格中的英文单词，把首字母全部大写，该怎么操作呢，怎么将Excel中英文首字母大写，Excel怎么设置英文首字母大写，下面就和小编一起来看看吧！......

2023-01-18
详细阅读
Excel教程 Excel怎么给所有的数字加10
Excel怎么给所有的数字加10？Excel数字怎么全部加10？怎么全部加1？当我们在使用Excel时，所有的数字都少10，或者1，该怎么给所有的数字都 10、 1呢，Excel怎么给所有的数字加10，EXcel数字怎么全部加10，下面就和小编一起来看看吧！......

2023-01-18
详细阅读
Excel教程 Excel怎么设置日期自动更新
Excel怎么设置日期自动更新？Excel怎么设置日期自动更新？当我们Excel表格中的日期需要实时更新到最新日期，该怎么设置呢，怎么将Excel表格日期自动更新到最新日期，Excel怎么设置日期自动更新，下面就和小编一起来看看吧！......

2023-01-18
详细阅读