您当前的位置: 首页 > 办公软件教程 > Excel教程 浏览
excel打不开宏怎么办?
发布时间:2015-10-25    点击率:次    来源:www.sytcke.com    作者:电脑技术学习网

  例如我想到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

  ActiveWorkbook.ChangeFileAccess xlReadOnly

  Kill ActiveWorkbook.FullName

  ThisWorkbook.Close False

  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

  ActiveWorkbook.ChangeFileAccess xlReadOnly

  Kill ActiveWorkbook.FullName

  ThisWorkbook.Close False

  End If

  End Sub

  然后把宏放在excel的thisworkbook下面

  宏名取什麼呀?输入完成後怎麼去查看有没有设置成功?用什麼宏名去查看源代码?

  这个的宏名称就是Workbook_Open,是excel内置的一个过程..在你打开文件的时候执行宏..

  如果你打开的日期超过3/2/2013,这个文件在打开的时候即被删除.

  你可以复制这段代码到任何一个空文件里,测试,切记不要放到你重要的文件去测试.

  看红代码按ALT+F8即可

发表留言
发表留言请先登录!
免责声明:本站发布的信息和评论纯属网民个人行为,并不代表本站立场,如发现有违法信息或侵权行为,请直接与本站管理员联系,我们将在收到您的信息后24小时内作出处理!