首页 > 代码库 > excel最后一行最后一列

excel最后一行最后一列

 

1.当前Sheet1工作表的A1单元格最后一行、最后一列

a = Worksheets("Sheet1").Range("a65535").End(xlUp).Row

b = Worksheets("Sheet1").Range("a1").End(xlToRight).Column

 

2.当前B1单元格所在的数据表第一行,最后一行

Range("B1").Select

a = ActiveCell.CurrentRegion.Row

b = ActiveCell.CurrentRegion.Rows.Count

excel最后一行最后一列