本文为《别怕，Excel VBA其实特别简单（第3版）》随书问题参考答案
如果要将第1行空行的行号存入变量IRow中，可以借助End、UsedRange、CurrentRegion等属性解决，如下面过程中的4种写法：
Sub 第1个空行的行号()
Dim IRow As Long
IRow = Range("A1").End(xlDown).Row + 1
IRow = Range("A1048576").End(xlUp).Row + 1
IRow = ActiveSheet.UsedRange.Rows.Count + 1
IRow = Range("A1").CurrentRegion.Rows.Count + 1
End Sub
当然，每种属性之间是有区别的，在某些特殊情境中，获得的结果也不完全相同。不同的方法适用于不同的情境，大家一定要正确区别使得。
