难道真没有哪位大神能够帮忙解决这个调整工作薄窗口大小的问题？

王南帅

等待高手啊

crazy0qwer

王南帅 发表于 2013-7-9 11:56
我把代码复制进去后，系统提示：方法"left"作用于对象application时失败

你的excel窗口最大化了吧？

1.     Sub AAA()
   
2.         Application.ScreenUpdating = False
   
3.         Application.WindowState = xlNormal
   
4.         Application.Left = ActiveWindow.Left + Application.Left
   
5.         Application.Width = ActiveWindow.Width
   
6.         ActiveWindow.WindowState = xlMaximized
   
7.     End Sub

复制代码

王南帅

crazy0qwer 发表于 2013-7-9 12:07
你的excel窗口最大化了吧？

啊，谢谢这位老师，解决了，谢谢你