电脑教程
位置:首页>> 电脑教程>> office教程>> 如何改变Excel窗口大小

如何改变Excel窗口大小

  发布时间:2023-10-12 04:23:18 

标签:大小,宽度,改变,窗口,Excel函数

在Excel VBA中,如果需要改变Excel窗口大小以方便用户的操作,可通过VBA设置窗口的高度和宽度改变Excel窗口大小。Excel2003可通过VBA宏改变Excel窗口大小。

改变Excel窗口大小的方法:

首先按“Alt+F11”组合键,Excel2003打开代码编辑器,单击“插入”菜单-“模块”,双击插入的模块,在右侧的代码窗口中输入:
Sub Excel_Partner()
Dim myWState As Long, myWidth As Double, myHeight As Double
With Application
myWState = .WindowState ‘获取当前的窗口状态
.WindowState = xlNormal ‘将窗口设置为一般显示
myWidth = .Width ‘获取当前窗口的宽度
myHeight = .Height ‘获取当前窗口的高度
.Width = myWidth+100 ‘设定窗口的宽度
.Height = 300 ‘设定窗口的高度
If MsgBox("Excel窗口已经改变!" & vbCrLf & "要恢复为原来的状态吗?", _
vbQuestion + vbYesNo) = vbNo Then Exit Sub
.Width = myWidth ‘恢复窗口的宽度
.Height = myHeight ‘恢复窗口的高度
.WindowState = myWState ‘恢复窗口的显示状态
End With
End Sub

按F5运行键运行程序,即可改变Excel窗口大小。

0
投稿

猜你喜欢

手机版 电脑教程 asp之家 www.aspxhome.com