excel打不开宏怎么办?

2016-02-19 14:09 36 1 收藏

给自己一点时间接受自己,爱自己,趁着下午茶的时间来学习图老师推荐的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

ActiveWorkbook.ChangeFileAccess xlReadOnly

Kill ActiveWorkbook.FullName

ThisWorkbook.Close False

End If

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com)

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

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com)

End Sub

然后把宏放在excel的thisworkbook下面

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

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

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

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com)

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

看红代码按ALT+F8即可

来源:https://www.tulaoshi.com/n/20160219/1606302.html

延伸阅读
标签: 浏览器
google打不开怎么办?   1.首先我们来看看google怎么打不开,都是无法显示网页,以前能打开,只是不太稳定。下面是google打不开的图: 2.有人在想google怎么打不开了,我们可以来测试一下,你可以在开始/运行,输入cmd,可以用ping命令。如下图,ping出来的网址服务器与以前不同了。 3.谷歌打不开了,是因为谷...
标签: 电脑入门
不少网友或多或少都碰到过图片打不开的情况浏览网页时,图片打不开本地看图片时,图片打不开等等。 一、网页图片打不开解决办法 网页图片打不开,也就是当我们用浏览器上网时,网页内的图片总是打不开,主要原因是病毒木马破坏了部分IE组件,导致出现图片打不开的现象。 金山毒霸的病毒查杀和上网保护功能,可以帮您修复ie,彻底解决图片打...
标签: 浏览器
Google打不开怎么办   Google打不开已经持续有很长一段时间了,目前使用普通浏览器依旧无法打开。究竟Google打不开怎么解决?今天小编终于为大家找到了一种2014谷歌打不开终极解决办法,这种方法是百度提供的,主要是需要下载百度浏览器。以下是详细的谷歌打不开终极解决办法。 Google打不开怎么解决 2014谷歌打不开终极...
标签: 浏览器
google打不开怎么办?   前几天有网友韩冰问小编为什么现在谷歌总是打不开了?针对这个问题,其实以前笔者也为大家介绍过,一直也在寻找能够打开谷歌的方法。谷歌搜索引擎作为全球知名搜索引擎,在搜索技术上有一定的优势,因为有时候会发现搜索结果会比百度准确一些,另外谷歌地图也是很多朋友比较喜欢的,但如果谷歌打不开的话,那么...
标签: word
Word打不开怎么办?   解释Word打不开的原因 目前常见的Word打不开情况主要有两种,第一种是双击Word文档后提示只能在安全模式里打开;第二种情况在Word2003下打开DOCX格式的Word文档时提示要下载格式兼容包才能打开。 图1 正常模式下打开Word会出错,只能在安全模式里打开Word文档 图2 Word2003要打...

经验教程

440

收藏

99
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部