Sheet1.UsedRange.Rows.Count'一般是用此种方式能取到最后一行的行标，但是如果Excel表的第一行是空的，就会导致只取Used Range（使用区域）的总行数。'举个栗子，如果一个表,只有A2单元格里有内容，那上一条的返回值就是1，因为使用区域只有一行的。'取到最后一行的行标方法如下：Sheet1.UsedRange.Cells(sht3.UsedRange.Rows.Count,1).row'Cells(使用区域的最后一行,第一列).行标'以下两上函数，一个取最后的行号，一个取最后的列号'根据提供的Range，得到最后一行行号Function GetLastRowNo(ByRef Rng As Range) As IntegerGetLastRowNo = Rng.Cells(Rng.Rows.Count, 1).RowEnd Function'根据提供的Range，得到最后一列的列号Function GetLastColNo(ByRef Rng As Range) As IntegerGetLastRowNo = Rng.Cells(1, Rng.Column.Count).ColumnEnd Function'调用GetLastRowNo(Sheet1.UsedRange)GetLastColNo(Sheet1.UsedRange)
