如何在vba中得到當前單元格的行號和列號

1、第壹種方法： ActiveSheet.Range("A" & Rows.Count).End (xlUp).Row

2、第二種方法：ActiveSheet.Range("a1048576").End(xlUp).Row

如果是低版本的OFFICE用ActiveSheet.Range("a65536").End(xlUp).Row

3、第三種方法：ActiveSheet.Cells(Rows.Count,1).End(3).Row

4、第四種方法：ActiveSheet.range("A1").CurrentRegion.Rows.Count

5、第五種方法：ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row

6、第六種方法：ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row

7、第七種方法：MaxRow? =Application.Evaluate("=MAX((A1:A1048576<>"""")*ROW(1:1048576))")