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表格中日期的单元格要以日期形式设置。
最好的平板电脑现如今平板电脑受到很多年轻朋友的青睐,但是目前市场上平板电脑还是很多的,到底要如何选择呢?最好的平板电脑是什么呢?下面就来推荐几款。最好的平板电脑荣耀平板2荣耀平板是华为旗下互联网
ipad如何越狱我们对于手机越狱应该都有一定的了解,但是ipad如何越狱可能还并不知道,确实越狱之后可以做很多事情,玩一些苹果不让玩的东西,下面就来具体介绍一下ipad如何越狱。ipad如何越狱?
平板电脑刷机教程平板电脑刷机帮助平板电脑刷机,能使平板运行的速度提高,那么平板电脑刷机如何操作呢?下面介绍一款PC电脑端软件完成平板电脑的刷机,一起来学习吧。平板电脑刷机教程步骤1下载并安装平板刷
回收站无法清空怎么办如何清空回收站详解回收站无法清空怎么办?使用Windows的用户对回收站不会陌生,它给了我们一剂ldquo后悔药rdquo。回收站保存了您删除的文件文件夹图片快捷方式和Web页等。这些项目将一直保留
回收站无法清空怎么办回收站无法清空解决方法电脑在我们生活中的应用已经越来越广泛了,那么你对电脑当中的应用软件和程序了解多少呢?我的电脑和我的文档,以及上网功能大概所有人都知道,回收站应该也是大家非常熟悉的,我们电脑里面的不
怎样选购家用抽油烟机家用抽油烟机选购方法介绍详解对于很多有选择恐惧症的朋友来说,选购家用电器产品是非常让人头疼的,尤其是在选择家用抽油烟机方面,很多人更是拿不定主意。别急,下面小编就为您介绍一下家用抽油烟机的选购相关知识。家用抽
窗式吸油烟机如何选购窗式吸油烟机选购方法介绍详解厨房需要解决的一个大问题那就是油烟问题了,一般我们会选择安装抽油烟机或者窗式吸油烟机,今天我们就来说说我们窗式吸油烟机,我们在选购的时候应该注意一些什么问题,和小编一起来了解我们的
抽油烟机有哪些款式抽油烟机款式类型介绍在现代厨房中,抽油烟机可谓是每家每户必备的家用电器。而抽油烟机作为非常重要的家电,因此我们在选购时一定要多加注意。在选购抽油烟机之前,我们首先要了解清楚抽油烟机的各种款式,来看看哪
空调制热功率是多少空调制热功率介绍夏天到了,天气开始炎热了,过高的室内温度会给我们的工作与生活带来困扰,这个时候就需要用到空调了,可以说空调在夏天的制冷效果是得到大家一致认可的,除了在夏天的时候非常受欢迎,空调制热
通风空调怎么样?和普通空调有什么区别?导语生活中空调的使用已经十分普遍了,所以大家对空调肯定不会陌生,但是大家对通风空调又了解多少呢。大家知道通风空调是怎样的吗?那么今天小编来为大家详细介绍一下通风空调系统的组成以及通
电动缝纫机维修方法介绍图解导语在家居生活中作为家庭主妇的话免不了会涉及到缝缝补补的,还有,学服装涉及的学生想要把自己设计的服装制作成型也可能会涉及到缝纫,以上两种情况如果有一台便携式电动缝纫机就可以解决问题