返回上海时时乐
当前位置: 主页 > Excel教程 > Excel VBA教程 >

Excel VBA实现文件自杀

时间:2014-09-26 14:15来源:Office教程学习网 www.jjdlf.net编辑:麦田守望者

分享一段代码:

'关闭文件时执行'文件自杀代码

Private Sub Workbook_BeforeClose(Cancel As Boolean)

ActiveWorkbook.ChangeFileAccess xlReadOnly '将文件设置为只读模式

Kill ActiveWorkbook。FullName '删除文件

Application.Quit '退出程序

End Sub

 

大家可以拿个没用的excel文件试试。自杀的无影无踪哦。

------分隔线----------------------------
标签(Tag):excel excel2007 excel2010 excel2013 excel2003 excel技巧 excel教程 excel实例教程
------分隔线----------------------------
推荐内容
猜你感兴趣
澳洲幸运10开奖结果 澳洲幸运10开奖结果 福建快3 飞速赛车平台 河北快3开奖 欢乐生肖 河北快3开奖 秒速快3 三分时时彩 快乐赛车开奖