我在Visio VBA中有以下代码。大部分时间它都可以正常工作,但是当形状(pShape)是页面上第一个选定的形状时,我会收到以下错误,该错误无法被捕获
-…
就在我发布之后,我看到了错误。我需要将所选页面设为当前活动页面: Application.ActiveWindow.Page = Application.ActiveDocument.Pages.Item(wpage.Name)