excel中使用vba设置当前窗口大小工具/原料moreexcel2013更多经验请关注，如果帮到了你，请在上方给个投票谢谢支持。 好人一生平安。 先顶后看年薪百万，如果帮到了你，帮忙给个好评，这对小编很重要，万分感谢。方法/步骤1/6分步阅读

首先我们打开一个工作样表作为例子。

2/6

使用alt+f11组合快捷键进入vbe编辑器，插入一个新的模块，并在模块中输入以下代码：

Sub AAA()

Application.ScreenUpdating = False

Application.WindowState = xlNormal

Application.Left = ActiveWindow.Left + Application.Left

Application.Width = ActiveWindow.Width / 2

ActiveWindow.WindowState = xlMaximized

End Sub

3/6

看这段代码中我们有一个固定优化代码screenupdating=false，在本例中其实作用不大，可以省略掉。screenupdating的作用是屏幕即时刷新，本代码比较短，所以作用不大。

4/6

将当前窗口设置为普通模式，即可以调整窗口大小的模式，另外两种窗口模式分别是最小化和最大化。

5/6

这个代码很重要，如果当前窗口为最大化，那么当前窗口的宽高设置是无效的对象设置，会出错。

6/6

ActiveWindow.Width返回值是当前窗口的像素，可以直接用Application.Width对象属性进行设置。ActiveWindow是只读对象，不可以进行直接修改。

注意事项

谢谢你的投票。

你的投票是我编辑经验的动力。谢谢你。

EXCEL窗口当前窗口