Range.Rows.Count和我可以通过将行索引传递给Excel 2010 VBA中的Range.Rows返回的行之间的不匹配

Question

I have a worksheet with 600 rows each representing a student. I have a User Form which displays one student at a time. The Next/Previous buttons on the form trigger a GetStudent Sub which takes one argument, the current row index. I don't want to work with all 600 rows at a time so I create a range with A1:Z10 syntax like this in the GetStudent Sub. This is done programmatically, but for clarity I've put a literal value in the code sample:

Dim ds As Range, w As Worksheet, currentRow As Range
Set w = ActiveWorkbook.Worksheets("students_sheet")
Set ds = w.Range("A4:Z5")

If I do

Debug.Print ds.Rows.Count

I get the expected 2, but when I pass an index to ds.Rows()

Set currentRow = ds.Rows(rowIndex)

I get the next row in the worksheet all the way through the 600 rows in the worksheet not only the 2 rows in the specified range. The range is not limited to the 2 rows indicated by the Rows.Count property. Can anyone help me figure out what I'm doing wrong?

Answer 1

The Rows property is relative to the range you call it on, and not bounded by the range itself.

So, when ds is set to A4:Z5 and you call ds.Rows(rowIndex) then you will get

rowIndex     Range
1            A4:Z4
10           A13:Z13
0            A3:Z3
-2           A1:Z1
-3           error