电脑教程
位置:首页>> 电脑教程>> office教程>> Excel表格怎么设置标准/合同到期自动弹出提醒?

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

  发布时间:2023-11-02 22:22:54 

标签:Excel,合同

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

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

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

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

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

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

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

复制内容到剪贴板

  1. Private Sub Workbook_Open()   

  2. dim v,s,n as Date   

  3. v = Application.WorksheetFunction.Max(Range("B2:B20"))  'C2:C20为要审查的单元格

  4. For Each s In Range("C2:C20")

  5. n = Date   '获取当前日期   

  6. If s > n And s < n + 60 Then    ' 设置到期60天时提醒   

  7.   If v > s Then   

  8.   v = s   

  9.   End If   

  10. End If   

  11. Next   

  12.      MsgBox "有产品于" & v & "到期,请及时修订!"

  13. End Sub  

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

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

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

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

0
投稿

猜你喜欢

手机版 电脑教程 asp之家 www.aspxhome.com