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
可以使用其他第三方程序进行更多的限制。
office文件限制使用时间
程序介绍:
本程序为免费工具,用于将 MS Office 文档转换为加密的 UND 文档,同时可设置文档的阅读次数及自动销毁时间。在阅读 UND 文档期间,用户无法复制文档内容。当 UND 文档满足销毁条件后,再次被打开时以不可恢复的方式安全删除该文档。
使用说明:
1、执行Setup.exe安装本程序。
2、在“我的电脑”或“资源管理器”中右键点击 MS Office 文档,选择“转换为 UND安全文档”。
3、在弹出的窗口中设置相关参数并点击“确定”。
4、将创建好的 UND 文档发送给他人。
5、在安装了本程序的电脑上可以通过鼠标双击打开UND文档,并在规定次数/时间内正常阅读。
利用宏,打开文件先检测日期,到期后,把内容清空并保存,如果只读则给它报错然后退出.把宏锁定即可.这种好像不能防备拷贝内容.
1.有一个Excel工作薄,假设我想让它在5月25日自动删除,怎样设置“宏”代码?
2.假设我想在5月25日让Excel工作薄中的Sheet2自动删除,其它工作表仍然保留,应该怎样设置“宏”代码?
以上,请高手帮忙解决。
query取得iframe中元素的几种方法
在iframe子页面获取父页面元素
代码如下:
$(