Ⅰ 请问Excel的数据设置了有效期,怎样设置到期提示
到期提示使用条件格式来处理,非数据有效性
Excel版本参考:2010
1、选中A1单元格,点专击开始属-样式-条件格式
2、新建规则-使用公式确定要设置格式的单元格
3、为符合此公式的值设置格式:=$A$2>TODAY()
4、点击格式-填充(选择红色),确定
5、点击确定,查看效果(超过当前日期,显示红色底纹)
Ⅱ excel怎么设置日期为年
右键
设置单元格格式
自定义
yyyy"年"
输入的时候
例如
2010就OK
显示的是2010年
Ⅲ EXCEL使用有效期
其实很简单,注意,使用以下代码时,请用没有重要数据的表试验,否则重要内容会被删除内
首先,在容A1中输入=2010-1-1
然后,在VB窗口中的thisworkbook中输入代码
Private Sub Workbook_Open()
Run "作废"
End Sub
然后插入模块,
在模块中输入
Sub 作废()
If Cells(1, 1) >= "2010-1-1" Then
Range("B1:G100").Select
Selection.FormulaR1C1 = "到期"
End If
End Sub
Ⅳ excel怎么算剩余有效期
公式为:
=K2-TODAY()
如图所示:
Ⅳ 如何把office excel文件设定个有效期
Excel文件无法自动删除的,但是可以用VBA设定一个时间,到期后自动销毁,比如填版充成需要的内容。
可以使用以权下代码:
Private Sub Workbook_Open()
If Date > Sheet1.[a1] Then '设定一个时间,到期时间,date是返回当前日期。
Range("a1:h100").Select '选中需要销毁的单元格范围
Selection.FormulaR1C1 = "到期" '用“到期”来填充。
ThisWorkbook.Close True
End If
End Sub
可以使用其他第三方程序进行更多的限制。
Ⅵ excel表格超过了使用时间期限怎么解决
用宏吗?
如果用的话,将下面代码贴到thisworkbook中,打开宏编辑器:工具-宏回-VB编辑器。
Sub KillThisWorkBook()
With ThisWorkbook
.Saved = True
.ChangeFileAccess xlReadOnly
'★★答★★Kill .FullName 执行了本句,就会自杀的,所以注释了,如果想到时候删除本文件,将上面的注释去掉。
.Close
End With
End Sub
Private Sub Workbook_Open()
If Now() > #1/1/2008# Then'改这里的时间
KillThisWorkBook
End If
End Sub
另外,你还要在这个好VB窗口中左边的本文档名上右击vbproject属性上右击,输入保护密码。
祝你成功。
Ⅶ Excel 怎么样设置使用期限
你安装的可能是试用版的,所以有使用期限,请安装正版软件或者破解版的就没问题了。
Ⅷ 如何设置Excel文件的使用期限,一年或100次、500次等等
1、首先打开电脑,然后键盘上按win +x弹出如下窗口。
Ⅸ 如何把office excel文件设定个有效期,过期文件自动作废
Excel文件无法自动删除的,但是可以用VBA设定一个时间,到期后自动销毁,比如填充回成需要的内容。答
可以使用以下代码:
Private
Sub
Workbook_Open()
If
Date
>
Sheet1.[a1]
Then
'设定一个时间,到期时间,date是返回当前日期。
Range("a1:h100").Select
'选中需要销毁的单元格范围
Selection.FormulaR1C1
=
"到期"
'用“到期”来填充。
ThisWorkbook.Close
True
End
If
End
Sub
可以使用其他第三方程序进行更多的限制。
Ⅹ excel有效期的函数
1.打开要处理的EXCEL表格,在目标单元格中输入函数公式=b2-datedif(B1,TODAY(),"内d"),回车。
[式中B2为保质期天数容,B1为生产日期单元,可根据实际天数进行修改。]DATEDIF函数可以得到从今天的生产日期起的天数,然后可以从保质期中减去剩余的有效天数。]