获取Excel选中区域的大小

f1::
if !objExcel
{
  arr:=[],brr:=[], objExcel:=""
  Try objExcel:=ComObjActive("Excel.Application")
}
选中总行数 := objExcel.Selection.Rows.Count 
选中总列数 := objExcel.Selection.Columns.Count
选中的第一个单元格的行号 := objExcel.ActiveCell.Row 
选中的第一个单元格的列号 := objExcel.ActiveCell.Column
选中的最后一个单元格的行号 := 选中的第一个单元格的行号 + 选中总行数-1
选中的最后一个单元格的列号 := 选中的第一个单元格的列号 + 选中总列数-1
提示内容 = 
(
选中的第一个单元格是%选中的第一个单元格的行号%:%选中的第一个单元格的列号%
选中的最后一个单元格是%选中的最后一个单元格的行号%:%选中的最后一个单元格的列号%
共选择了%选中总行数%行，%选中总列数%列
)
MsgBox, % 提示内容
Return