0

Excel から新しい Visio インスタンスを開始し、いくつかのコードを実行したいと考えています。これはうまく機能しますが、visio マクロでコードを直接実行するよりも、コードの実行に約 100 倍の時間がかかります。

ビジオ 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

誰もそれを修正する方法を知っていますか?

ご協力ありがとうございました!

4

1 に答える 1