有朋友需要一些另类的功能,比如让一个 Excel 文件执行完代码后把自身给删除了,其实 Excel 还真的可以做到,这是一段网上摘抄的代码, 可以让一个工作簿执行完代码后自己删除自己.
附件下载:
点击从百度网盘下载
具体代码:
Sub CloseSelf()
Application.DisplayAlerts = False
ThisWorkbook.ChangeFileAccess xlReadOnly
MsgBox "点击确定按钮我就把自己删除了哟 ^_^"
Kill ThisWorkbook.FullName
ThisWorkbook.Close False
End Sub |