我想从excel启动一个新的Visio实例并执行一些代码。这很好,但是执行代码比在visio宏中直接执行代码要花费大约100倍的时间。
Visio 2003
Dim visio_app As New Visio.Application
Dim doc As Visio.Document, pg As Visio.page
Set doc = visio_app.Documents.Open(.......)
Set pg = visio_app.ActivePage
'Performance problem runing this methode
delete.doDeleteDeleted visio_app, pg
......在visio中直接启动代码时没有性能问题。
delete.doDeleteDeleted Application, Application.ActivePage有人知道怎么修吗?
谢谢你的帮助!
发布于 2013-09-30 13:37:40
我已经找到解决办法了。我创建了一个visio文件,其中包括doDeleteDeleted方法和一个执行doDeleteDeleted的run子文件。然后我使用visio_app.ExecuteLine(....)若要执行Visio文件中的代码,请执行。这是可行的,但它没有吸引力
https://stackoverflow.com/questions/19044500
复制相似问题