当前位置: 主页 > Office办公 > Excel专区 > Excel函数 > 如何查询Excel子窗口的最大高度和宽度

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

  • 2023-02-14
  • 来源/作者: Wps Office教程网/ 菜鸟图库
  • 128 次浏览

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

查询Excel子窗口的最大高度和宽度的方法:

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

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