电子表格EXCEL使用有效期

1.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。

2.如何设置EXCEL的有效期?EXCEL中其它文档,能不能设置使用

可以做到： 象想飞的小鱼说的那样可以用VBA宏实现，但是有一个问题，如果使用都选择禁用宏怎么办？ 所以就得用另外一种办法，再利用一个Excel文件，宏放在新的Excel文件中。

用这个新Excel文件打开你需要保护的文件。如果不执行宏是无法打开原文件的。

到时间可以把原文件删除掉。 如果想直接打开原文件，则需要输入打开密码。

没有密码还是打不开。 还有就是，如果他把系统时间改了也没法根据时间来“自杀”了。

如果使用者那上网的话，可以从internet上读当前时间进行处理。 如果你想这样处理请给我留言。

3.excel中,输入信息,有一栏是有效期,如何设置在有效期届满时,打

在VBA,ThisWorkBook代码框输入：

Private Sub Workbook_Open()

Dim AD As Date

AD = Sheets(1).Range("A1") 'Sheet1,A1就是你需要提醒的有效期单元格

If AD = DateValue(Now) Then

MsgBox ("Time Out!")

End If

End Sub

一打开工作簿自动检查，只运行一次，到期就跳出警告。

4.excel限制访问

新建一个excel工作簿：右键单击空白位置，然后选择新建--excel

excel2007如何设置访问权限

打开excel，在工具栏上执行：审阅---保护工作簿

打开一个下拉列表，在这个列表里选择【限制访问】

弹出权限对话框，在这个对话框里，我们勾选【限制对此工作簿的权限】，然后你就能对下面的内容进行更改。

在这里输入允许查看和更改该工作簿的用户的ID，有人问这个ID是什么，这是在微软里注册的账号，如果你没有微软的账号是不允许设置权限的，你根本看不到该页面。它会提示你注册账号。

点击【其他选项】进行更高级的设置

打开高级设置对话框，这里可以设置文件的有效期，过了有效期加密文件就会失效。点击下拉列表可以选择到期时间。

下面三个选项是用户可选的三个具体权限，你想要允许他人进行哪些操作：打印，复制，还是编程

最后填写一下索取权限的邮件地址，也就是你的邮件的地址，当用户想要更改自己的权限的时候，就可以给你发送邮件。

设置完成后，保存文档即可。