ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 1270|回复: 9

“简单的疑难原因”查找

[复制链接]

TA的精华主题

TA的得分主题

发表于 2015-10-15 10:17 | 显示全部楼层 |阅读模式
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
本帖最后由 limshanb 于 2015-10-15 11:02 编辑

我在工作中遇到一个“简单的疑难问题”,这个问题是:word的宏代码居然无征兆地无响应,就是点击了宏执行命令,宏却不去执行。反复查找原因也找不到,样例放在下面,请高手们帮忙看看是什么问题。

Normal.rar

10.49 KB, 下载次数: 14

TA的精华主题

TA的得分主题

发表于 2015-10-15 11:06 | 显示全部楼层
楼主不仅存成模板文件,
而且还是名为 Normal.dot 的模板文件,
你这样发出来不是害人嘛。

先用 DOC 文档测试好,
就算要存成模板,也不要直接命名为 Normal 发出来,改个名。

TA的精华主题

TA的得分主题

 楼主| 发表于 2015-10-15 13:38 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
shenghua8 发表于 2015-10-15 11:06
楼主不仅存成模板文件,
而且还是名为 Normal.dot 的模板文件,
你这样发出来不是害人嘛。

接受你的批评,以后改正。
这次已经提交了,请高手们打开压缩包时,先在压缩包内改名再打开文件,这样就不会有问题了。在我自己的机器上试验,即使不改名也不会影响系统的默认模板。不会害人的。
不管怎么还要感谢你的提醒。

TA的精华主题

TA的得分主题

发表于 2015-10-15 15:05 | 显示全部楼层
  1. Sub 背景色()
  2.     ThisDocument.Background.Fill.Visible = msoTrue
  3.     ThisDocument.Background.Fill.ForeColor.RGB = RGB(255, 255, 153)
  4.     ThisDocument.Background.Fill.Solid
  5. End Sub
  6. Sub 清除背景色()
  7.     ThisDocument.Background.Fill.Visible = msoFalse
  8. End Sub
复制代码

以后录制宏的时候,在对话框里选一下,【将宏保存在】→【文档】里。
无标题.png
不要再保存在模板里!!!!!!!!!!!!!!!!!!!!!{:soso_e111:}



TA的精华主题

TA的得分主题

 楼主| 发表于 2015-10-15 16:40 | 显示全部楼层
本帖最后由 limshanb 于 2015-10-15 16:42 编辑

谢谢啊大侠!
我保存在模板里的理由如下:
1、建立任何文件都可以应用这个宏,而保存在具体文件中只对该文件有效。
2、这个代码很简单不会造成臃肿和效率低下。
3、我在系统默认存放word宏的文件夹中放置了多个不同功能的宏并建立了快捷方式放到快捷工具栏,这样做的好处是需要什么样的功能就启动什么模板。这些各种功能的模板我都做了备份,一旦坏了就重新恢复备份。
4、我不怕通用模板出问题,大不了删除它系统还会自动生成一个全新的,当然这个保存了宏的通用模板我也做了备份。
我的机器中有多个C盘系统ghost备份,各个备份有不同的功能(win7、xp等),我出现这个问题是由于上一个winxp系统中的word通用模板,切换到另一个winxp系统中就出现宏功能失效的提述问题,但是这个问题只要手动设置一次背景色宏功能就可以有效使用了,这个原因一直找不到,故此来到这里求高手找出原因。

再次谢谢大侠的帮助。

TA的精华主题

TA的得分主题

发表于 2015-10-15 17:11 | 显示全部楼层
limshanb 发表于 2015-10-15 16:40
谢谢啊大侠!
我保存在模板里的理由如下:
1、建立任何文件都可以应用这个宏,而保存在具体文件中只对该 ...

废话一堆。
那些理由留给你自己即可,发出来求助时请尊重别人。
只说明问题是否解决就可以了。

TA的精华主题

TA的得分主题

 楼主| 发表于 2015-10-16 21:38 | 显示全部楼层
shenghua8 发表于 2015-10-15 17:11
废话一堆。
那些理由留给你自己即可,发出来求助时请尊重别人。
只说明问题是否解决就可以了。

你没有解决我的任何问题我都感谢你多次,这表明我对论坛的尊重和支持,对所有热心回帖网友的响应。

我并不是废话,这些都是非常实用的经验,有心人看了后会如获至宝。如果看后感觉是废话证明这个人根本不具备基本的word应用经验和互联网精神、素质。

你仅仅把我样例中的代码重新贴出来,让我不要保存到模板中,我根本就不同意你的观点,所以才贴出我的理由。

你贴出的代码与我的样例中的代码一样,没有任何变化,还问我问题解决了没有,没有新的改变,还是原样,怎么会解决呢?

TA的精华主题

TA的得分主题

 楼主| 发表于 2015-10-17 11:44 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
你曾经要求“尊重别人”,这个我也同样。如果你没有尊重别人,当然我也同样!
我尊重别人用语谦卑,处处赔小心,但是,一旦听到别人的粗鲁语言,我立刻就没有了一点谦卑和礼貌。这是中国人应该有的血性,我一贯看不起奴才、汉奸、势利眼,请你不要在回答我的问题了,你给出的代码经过试验也无效,我宁肯得不到答案也绝不再求你这样的人!

TA的精华主题

TA的得分主题

发表于 2015-10-19 22:46 | 显示全部楼层
本帖最后由 dafanshu1 于 2015-10-19 22:47 编辑

我在word2003版试过楼主的“背景色”宏是有效的,但在2007版却正如楼主所说,要手动设置过一次页面背景色后才有效,否则就如VBA帮助所说的,其实此宏也是有效,只不过要在“Web版式”视图才能看出效果。我曾想用sendkeys语句来先模拟快捷键执行一次页面背景色设置,然后再执行楼主的语句,但不知为什么设置不成功。看来要求高手解决了。

TA的精华主题

TA的得分主题

 楼主| 发表于 2015-10-20 21:30 | 显示全部楼层
dafanshu1 发表于 2015-10-19 22:46
我在word2003版试过楼主的“背景色”宏是有效的,但在2007版却正如楼主所说,要手动设置过一次页面背景色后 ...

谢谢您,热心的网友。
其实这个问题不会造成多大的不方便,只是我是个追根求底的个性,不搞明白就难受。
我是恢复了另一个ghost系统(同样的office2003)出现这个问题的,如果手动多设置几次背景色,会不知不觉地又好用(有效)了,是何原因不明。
再次谢谢您的惠顾。
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2025-1-15 18:14 , Processed in 0.045309 second(s), 9 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表