社区
VB基础类
帖子详情
复杂的VBA问题,高手请进
VertyNew
2003-10-06 11:11:23
各位,小弟在写程序时遇到一个这样的问题:
在VB中调用Word中的VBA,为其动态加载对象(如:窗体, 类等等), 想让其实现监控Word的作用.但在部分机子上使用时, 一旦给这些对象的属性赋值时, 就出现内容急剧性增加, 直到内容溢出导致死机, 这些机子系统与硬件上与其它机器没有什么区别. 这让小弟百思不得其解, 故想让大家来帮帮忙.
...全文
86
12
打赏
收藏
复杂的VBA问题,高手请进
各位,小弟在写程序时遇到一个这样的问题: 在VB中调用Word中的VBA,为其动态加载对象(如:窗体, 类等等), 想让其实现监控Word的作用.但在部分机子上使用时, 一旦给这些对象的属性赋值时, 就出现内容急剧性增加, 直到内容溢出导致死机, 这些机子系统与硬件上与其它机器没有什么区别. 这让小弟百思不得其解, 故想让大家来帮帮忙.
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
12 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
VertyNew
2003-10-20
打赏
举报
回复
经过多天的思考, 我自已找到问题了, 原来是Word文件中存在非法宏, 也就是说为其动态添加宏时没有动态清除, 虽然Word不会把宏存贮到文件中, 但宏已经在文件中注册过, 下次再动态添加时虽然不会报错, 但内存会不停地增加. 这种情况只需动态添加一次, 再清除, 保存后在打开, 此时的添加宏就不会出问题了.
感谢大家
Kivic
2003-10-08
打赏
举报
回复
把事件写在初始化过程initialize中,保证只进行一次,
Lionking1027
2003-10-08
打赏
举报
回复
那就有一点不解了,先帮你UP一下
VertyNew
2003-10-07
打赏
举报
回复
没人能帮上忙吗????
射天狼
2003-10-06
打赏
举报
回复
资源用完了没释放,你一句代码也没有,怎么说呢~(#*$&(*#
rednod
2003-10-06
打赏
举报
回复
学习
venursa
2003-10-06
打赏
举报
回复
有点像宏病毒...
venursa
2003-10-06
打赏
举报
回复
学习
VertyNew
2003-10-06
打赏
举报
回复
谢谢您:Lionking1027(自由之子),我并没有加任何的循环。
而且这些VBA代码我把它们放入Word的VBA编辑器中运行毫无问题,真是让我百思不得其解。
在跟踪的过程中,我发现只有部分DOC文档中会出现这种情况,而且这些文档并不是在所有机器上都会这样,挺挑食的。
它们的安全级别我也相应降低了,可还是不行。
Lionking1027
2003-10-06
打赏
举报
回复
代码是没问题,不知道楼主是不是制造了多个循环,或者是其中用一个无限死循环之类的
射天狼
2003-10-06
打赏
举报
回复
你在任务管理器中看看WORD的进程是否关闭,以及各个进程的内存使用情况!!
你给的这段代码是没问题,你用的就这一段代码吗?
VertyNew
2003-10-06
打赏
举报
回复
全都释放干净了。
如我给它添加一幅图片:
dim pic as Object
Set pic = word.Application.Selection.InlineShapes.AddPicture(FileName:=fn, LinkToFile:=False, SaveWithDocument:=True).ConvertToShape
pic.WrapFormat.Side = 1
pic.WrapFormat.Type = 3
pic.ZOrder 4
pic.Left = 0
pic.Top = 0
以上都很正常
pic.Width = 300
pic.Height = 300
set pic = Noting
内存开始往不停地增。
调试状态下把这两句去掉则正常,但在非调试状态下一样不正常。
当然这只是一小部分,动太加窗口、加类时也会出现这种现象。
烦麻各位帮忙看看。谢谢!
VBA
制作的进销存管理系统
VBA
制作的进销存管理系统 【下载地址】
VBA
制作的进销存管理系统 本项目是一个基于
VBA
开发的进销存管理系统,专为企业设计,帮助自动化处理进货、销售、库存和财务管理等流程,显著提升工作效率。系统提供基本功能如用户登录、权限管理、入库出库统计等。开发者在使用过程中发现了一些
问题
,如权限管理、出库统计报错等,并提出了改进建...
EXCEL
VBA
编程(excel办公
高手
必经之路)-曾贤志-专题视频课程
宏基础
VBA
编程基础 常用语句(分支、循环语句的基础及应用)
VBA
结合工作表的函数功能的应用等
VBA
摘取Word图形(Shapes)内文字
要解决的
问题
: 在使用
VBA
抓取Word文档内容时发现存放在形状里的文字是不能通过paragraphs读到的。如下图所示: 解决思路简述: 外圈for循环遍历Doc文档内所有形状对象得到它们的名字,知道了名字以后用“文本对象.shapes.Range(Array(形状名)).Select”方法锁定;锁定以后再内圈for循环读出备选中Selection里面的每一个字符并累加起来。 详细的步骤和思路见下方代码注释。 上代码(肯定有更好方法,我这个只是小白的尝试,请
高手
赐教): Sub Demo() Dim
视频教程-EXCEL
VBA
编程(excel办公
高手
必经之路)-Office/WPS
EXCEL
VBA
编程(excel办公
高手
必经之路) Office培训讲师,...
[VB.NET]关于EXIF读取的详细
问题
,
高手
请进
<script type="text/javascript"
VB基础类
7,789
社区成员
197,583
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章