给自己一点时间接受自己,爱自己，趁着下午茶的时间来学习图老师推荐的excel打不开宏怎么办？，过去的都会过去，迎接崭新的开始，释放更美好的自己。
【 tulaoshi.com - Excel教程 】
例如我想到2013年3月2号後自动删除一个excel表格，在表格中建了个宏叫Macro1
具体如下：
Sub Macro1()
Private Sub Workbook_Open()
Application.DisplayAlerts = False
Dim datee As Date
datee = #3/2/2013#
If Date datee Then
（本文来源于图老师网站，更多请访问http://www.tulaoshi.com）ActiveWorkbook.ChangeFileAccess xlReadOnly
Kill ActiveWorkbook.FullName
ThisWorkbook.Close False
（本文来源于图老师网站，更多请访问http://www.tulaoshi.com）End If
End Sub
但这个宏执行不了，2013年3月4号这个excel表格还没有删除!我不是电脑的管理员，是用户这不会影响吧?
把宏的第一句删除,变成:
Sub Workbook_Open()
Application.DisplayAlerts = False
Dim datee As Date
datee = #3/2/2013#
If Date datee Then
（本文来源于图老师网站，更多请访问http://www.tulaoshi.com）ActiveWorkbook.ChangeFileAccess xlReadOnly
Kill ActiveWorkbook.FullName
ThisWorkbook.Close False
（本文来源于图老师网站，更多请访问http://www.tulaoshi.com）End If
End Sub
然后把宏放在excel的thisworkbook下面
宏名取什麼呀?输入完成後怎麼去查看有没有设置成功?用什麼宏名去查看源代码?
这个的宏名称就是Workbook_Open,是excel内置的一个过程..在你打开文件的时候执行宏..
如果你打开的日期超过3/2/2013,这个文件在打开的时候即被删除.
你可以复制这段代码到任何一个空文件里,测试,切记不要放到你重要的文件去测试.
看红代码按ALT+F8即可
来源:http://www.tulaoshi.com/n/20160219/1606302.html
看过《excel打不开宏怎么办？》的人还看了以下文章 更多>>
