我想在visio中用vba.appVisio是一个代表visio应用对象的变量名,使变焦与窗口相适应。
appVisio.ActiveWindow.Zoom = -1
工作,但我想避免使用ActiveWindow,当我尝试appVisio.Windows(1)或appVisio.Window时,它不起作用,因为这两行返回的是visApplication类型的窗口,而.ActiveWindow返回的是visDrawing类型的窗口,我在这里做错了什么。
Visio窗口有一个叫做ViewFit的属性,可以实现你想要的功能。你可以把它设置为visFitPage来适应页面,或者visFitWidth来适应页面的宽度。
appVisio.ActiveWindow.ViewFit = visFitPage