如何用VBA让visio绘图的窗口设置缩放适合窗口?

问题描述 投票:0回答:1

我想在visio中用vba.appVisio是一个代表visio应用对象的变量名,使变焦与窗口相适应。

appVisio.ActiveWindow.Zoom = -1 

工作,但我想避免使用ActiveWindow,当我尝试appVisio.Windows(1)或appVisio.Window时,它不起作用,因为这两行返回的是visApplication类型的窗口,而.ActiveWindow返回的是visDrawing类型的窗口,我在这里做错了什么。

excel vba visio
1个回答
0
投票

Visio窗口有一个叫做ViewFit的属性,可以实现你想要的功能。你可以把它设置为visFitPage来适应页面,或者visFitWidth来适应页面的宽度。

appVisio.ActiveWindow.ViewFit = visFitPage
© www.soinside.com 2019 - 2024. All rights reserved.