excel中使用vba设置当前窗口大小
工具/原料
excel2013
更多经验请关注,如果帮到了你,请在上方给个投票谢谢支持。好人一生平安。
先顶后看年薪百万,如果帮到了你,帮忙给个好评,这对小编很重要,万分感谢。
方法/步骤
1、首先我们打开一个工作样表作为例子。
2、使用alt+f11组合快捷键进入vbe编辑器,插入一个新的模块,并在模块中输入以下代码:Su水瑞侮瑜bA帆歌达缒AA()Application.ScreenUpdating=FalseApplication.WindowState=xlNormalApplication.Left=ActiveWindow.Left+Application.LeftApplication.Width=ActiveWindow.Width/2'ActiveWindow.WindowState=xlMaximizedEndSub
3、看这段代码中我们有一个固定优化代码screenupdating=false,在本例中其实箧咦切诏作用不大,可以省略掉。screenupdating的作用是屏幕即时刷新,本代码比较短,所以作用不大。
4、将当前窗口设置为普通模式,即可以调整窗口大小的模式,另外两种窗口模式分别是最小化和最大化。
5、这个代码很重要,如果当前窗口为最大化,那么当前窗口的宽高设置是无效的对象设置,会出错。
6、ActiveWindow.Width幻踔佐曝返回值是当前窗口的像素,可以直接用Application.Width对象属性进行设置。ActiveWindow是只读对象,不可以进行直接修改。