现在的位置: 首页 > 精选转贴 > 正文

Excel 文档执行完后删除自己

2014年06月20日 精选转贴 ⁄ 共 274字 ⁄ 字号 暂无评论 ⁄ 阅读 1,368 次

 

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

 001

附件下载:

点击从百度网盘下载

  

具体代码:

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

给我留言

您必须 [ 登录 ] 才能发表留言!