当前位置: 主页 > Office办公 > Excel专区 > Excel教程 > Excel2003教程 > 如何查询Excel窗口的高度和宽度

如何查询Excel窗口的高度和宽度

  • 2022-06-07
  • 来源/作者: Wps Office教程网/ 菜鸟图库
  • 151 次浏览

在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窗口的高度和宽度。