Excel VBA Range.Rows.Count给出意外结果

Excel VBA Range.Rows.Count给出意外结果,excel,vba,Excel,Vba,我有一个包含地址的范围变量-$2:$2,$4:$205,$214:$214-(3组行) 我想获得该范围内所有行的计数 但是,range.Count给出了所有单元格的计数(50000~),range.Rows.Count只返回1—第一组中所有行的计数。如何获得所有行的计数 谢谢 Dim rowCount As Long Dim ctr As Long 'You could use your range variable in place of Selection below For ctr =

我有一个包含地址的范围变量-$2:$2,$4:$205,$214:$214-(3组行)

我想获得该范围内所有行的计数

但是,range.Count给出了所有单元格的计数(50000~),range.Rows.Count只返回1—第一组中所有行的计数。如何获得所有行的计数

谢谢

Dim rowCount As Long
Dim ctr As Long

'You could use your range variable in place of Selection below
For ctr = 1 To Selection.Areas.Count
    rowCount = rowCount + Selection.Areas(ctr).Rows.Count
Next
Debug.Print rowCount