你可以遍历ActiveWindow.Windows列表,找到.Type = visDockedStencilBuiltIn的任何窗口,或者你可以通过.Document.Name,我认为你可以通过检查(.WindowState和visWSActive)来检查模板是否在前面。 =真
所以基本上它的工作方式,模板并不真正附加到您的文档,而是显示文档的窗口。因此,您必须查看文档窗口中打开的子窗口,其中每个子窗口都可以有一个关联的文档(模板)
解决了!通过使用以下代码替换vsoDoc变量的赋值,我得到了所需的结果。
For i = 1 To ActiveWindow.windows.Count If ActiveWindow.windows(i).Type = visDockedStencilBuiltIn Then Debug.Print ActiveWindow.windows(i).Document.Name Set vsoDoc = ActiveWindow.windows(i).Document Debug.Print vsoDoc.Name End If Next