下面的函数应该返回最后一个条目范围内的行
据我所知,该功能有效,但我想知道myRange(myRange.Count).Row
和myRange(1)
应该是什么意思?
谢谢你的帮助!
Public Function lastRec(myRange As range, myDate As Date)
For x = myRange(myRange.Count).Row To myRange(1).Row Step -1
If CDate(Left(Cells(x, myRange.Column), 10)) = myDate Then
lastRec = x
Exit Function
End If
Next x
End Function
答案 0 :(得分:1)
lastRec()
函数实际返回myRange
中第一个单元格的行,其前10个字符与传递的myDate
匹配
如果myRange
是一个1列的范围
myRange(myRange.Count).Row
返回myRange
myRange(1).Row
返回myRange
答案 1 :(得分:0)
Range.Count
返回一个Long值,表示集合中的对象数,因为range.row
返回该范围中第一个区域的第一行的编号。
range(1)
是1指定范围的位置,以返回表示单个单元格或一系列单元格的Range对象。