如何查詢Excel子窗口的最大高度和寬度
在Excel VBA中,如果需要查詢Excel子窗口的最大高度和寬度以方便用戶的操作,可通過VBA查詢Excel子窗口的最大高度和寬度。Excel2003可通過VBA宏查詢Excel子窗口的最大高度和寬度。
查詢Excel子窗口的最大高度和寬度的方法:
首先按“Alt+F11”組合鍵,Excel2003打開代碼器,單擊“插入”菜單-“模塊”,雙擊插入的模塊,在右側(cè)的代碼窗口中輸入:Sub Excel_Partner()Dim myMaxHeight As Double, myMaxWidth As DoublemyMaxHeight = Application.UsableHeightmyMaxWidth = Application.UsableWidthMsgBox "Excel子窗口:" _& vbCrLf & "最大高度為:" & myMaxHeight _& vbCrLf & "最大寬度為:" & myMaxWidth, vbInformationEnd Sub
按F5運(yùn)行鍵運(yùn)行程序,返回當(dāng)前系統(tǒng)下Excel子窗口的最大高度和寬度。