Office教程学习网

在Excel VBA中，如果需要查询Excel窗口的高度和宽度以方便用户的操作，可通过VBA查询Excel窗口的高度和宽度。Excel2003可通过VBA宏查询Excel窗口的高度和宽度。

查询Excel窗口的高度和宽度的方法：

首先按“Alt+F11”组合键，Excel2003打开代码编辑器，单击“插入”菜单-“模块”，双击插入的模块，在右侧的代码窗口中输入：
Sub Excel_Partner()
Dim myHeight As Double, myWidth As Double
myHeight = Application.Height
myWidth = Application.Width
MsgBox "Excel窗口：" _
& vbCrLf & "高度为：" & myHeight _
& vbCrLf & "宽度为：" & myWidth, vbInformation
End Sub

按F5运行键运行程序，返回当前系统下Excel窗口的高度和宽度。