有朋友需要一些另类的功能,比如让一个 文件执行完代码后把自身给删除了,其实 Excel 还真的可以做到,这是一段网上摘抄的代码, 可以让一个工作簿执行完代码后自己删除自己.

如何实现 Office Excel 文件执行完代码后把自身给删除了

附件下载:

点击从百度网盘下载

 

具体代码:

Sub CloseSelf()
Application.DisplayAlerts = False
ThisWorkbook.ChangeFileAccess xlReadOnly
MsgBox "点击确定按钮我就把自己删除了哟 ^_^"
Kill ThisWorkbook.FullName
ThisWorkbook.Close False
End Sub

发表评论

您的电子邮箱地址不会被公开。 必填项已用*标注