如何使指定的EXCEL文件在设定的时间内自动删除

如何使指定的EXCEL文件在设定的时间内自动删除,第1张

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

可以使用其他第三方程序进行更多的限制。

jxl 删除功能不怎么好用。之前我做过一个比较大点的excel吧,列能有60+,然后我删除某一列,结果jxl删除的不是我指定的列,而且最多好像只删除了不到10列。然后没办法,只能做隐藏了。增加行,没明白你的意思。


欢迎分享,转载请注明来源:内存溢出

原文地址: https://outofmemory.cn/bake/11609594.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-17
下一篇 2023-05-17

发表评论

登录后才能评论

评论列表(0条)

保存