昨天工作中编写VBA模块时遇到的一些小问题
2011-05-25 07:56
429 查看
做成本会计的都知道,这个行当经常与数据打交道。昨天同事拿了300个工作簿(一个型号一个报告书)来找我,让我帮忙把里面链接都断开。让我帮他分担150个。我勒个去,我只能运用一下VBA的小知识了,直接将300个承包了下来。不过在编写VBA的过程中也遇到了一些问题还没有解决。我的代码如下:
上述代码虽然能够实现断开链接,但是如果工作簿中存在多个链接时,采用循环断开,1次可以执行,2次报错,现在还未找到原因。唉!
错误为:“自动化Automatic.......",或者直接关闭EXCEL程序。我用的是office2010。
Ps:这个代码是断开链接其他工作簿的数据,而不是断开工作表中的超级链接,网上很多帖子都是误导。
'Links是个数组,用来接收所有链接的名字 Links = wbNew.LinkSources(xlExcelLinks) On Error Resume Next If Not IsEmpty(Links) Then For iii = 1 To UBound(Links) wbNew.BreakLink Name:=Links(iii),Type:=xlLinkTypeExcelLinks '断开excel链接。这段代码循环后容易出错,原因不明 Next End If On Error GoTo 0
上述代码虽然能够实现断开链接,但是如果工作簿中存在多个链接时,采用循环断开,1次可以执行,2次报错,现在还未找到原因。唉!
错误为:“自动化Automatic.......",或者直接关闭EXCEL程序。我用的是office2010。
Ps:这个代码是断开链接其他工作簿的数据,而不是断开工作表中的超级链接,网上很多帖子都是误导。
相关文章推荐
- 一些工作中遇到的问题随笔记录
- android使用CMake进行jni编写遇到的一些问题
- [JAVA加解密]仿照DH算法编写ECDH算法时遇到的一些问题
- 工作中遇到的一些路由问题
- 最近工作里遇到的一些问题,记录下来
- 工作中遇到的一些问题总结(一)
- myeclipse中编写小java项目遇到的一些问题(持续更新)
- 关于用c生成的dll在使用其他供应商的工具创建可执行模块时遇到的一些问题
- CDH5.3.x安装准备工作以及遇到的一些问题
- 最近工作中遇到ElasticSearch一些问题总结
- f在工作中遇到的一些问题及总结(f的第一篇博客)
- 编写Android app更新模块遇到的问题分析与总结
- js在工作中遇到的一些问题
- .Net开发工作中常遇到的一些问题及解决方案
- 最近工作中遇到ElasticSearch一些问题总结
- 工作中遇到的一些 小问题
- 工作中遇到的问题:百万条数据的查询、删除、修改效率提高的一些思考,解决方案(二)
- 编写前台脚本时遇到的一些小问题
- 蓝牙模块HC05遇到的一些常见的问题
- [转]工作中遇到的一些问题汇总