捕获已打开的Visio的所有实例

时间:2016-11-10 17:55:02

标签: vba visio-vba

我有以下代码,它捕获一个打开的Visio打开的实例/进程,并打开文件名(在一个主窗口内)。

但是,如何确保捕获在同一环境中运行的Visios(visio.exe)的其他实例? (这只捕获当前窗口和当前窗口内的打开文件)

x = 0
Do
    inputBoxResponse = InputBox(inputBoxPrompt, "Please Choose Document to Update", 0)
    If inputBoxResponse = "" Then
        inputBoxResponse = "0"
    End If
    If IsNumeric(inputBoxResponse) Then
        thisDocIndex = CInt(inputBoxResponse)
    Else
        thisDocIndex = 0
    End If

Loop While thisDocIndex <> 0 Or thisDocIndex > (Application.Documents.Count - x)    

非常感谢任何有关正确方向的帮助!

例如:与Visio类似的东西? Can VBA Reach Across Instances of Excel?

0 个答案:

没有答案