2013-09-27 9 views
0

Excel에서 새로운 Visio 인스턴스를 시작하고 일부 코드를 실행하려고합니다. 잘 작동하지만 visio 매크로에서 직접 코드를 실행하는 것보다 코드를 실행하는 데 약 100 배의 시간이 소요됩니다. 2003새 Visio 인스턴스의 성능 문제

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 성능에 문제가 내가 Visio의 코드를 직접 시작

delete.doDeleteDeleted Application, Application.ActivePage 

는 아무도 그것을 해결하는 방법을 알고 않습니다

?

도움 주셔서 감사합니다.

+0

이 delete.doDeleteDeleted 메소드 란 무엇입니까? Visio에서 실행할 수있는 Excel의 VBA 루틴입니까? –

+0

예, Visio에서도 실행됩니다. – Axel

답변

1

이미 해결 방법을 발견했습니다. doDeleteDeleted 메소드와 doDeleteDeleted를 실행하는 run 서브를 포함하는 Visio 파일을 만들었습니다. 그런 다음 visio_app를 사용합니다. ExecuteLine (....) Visio 파일의 코드를 실행합니다. 이것은 효과가 있지만 매력적이지 않습니다.