如何获得选定区域最大行号或者最小行号

lmy945150

我选择了一个用一个鼠标选定了区域，如何用vba获取选定区域的起始行或者终止行号？

liulang0808

这个需要看楼主是怎么选定的区域的
如果是规则的矩形区域。这个好确认
如果是选中多个区域，可以循环遍历判断的

lmy945150

连续矩形区域

feilanga

1. Sub 选取区域行数()
   
2.     起始行数 = Selection.Row
   
3.     总行数 = Selection.Rows.Count
   
4.     尾行数 = 起始行数 + 总行数 - 1
   
5.     MsgBox "选取区域的第一行的行数为:" & 起始行数 & Chr(13) _
   
6.         & "选取区域的最后一行行数为:" & 尾行数
   
7. End Sub

复制代码

lmy945150

感谢，明白这个思路了。

taller