能不能用CELL查看里面得字段
来计算记录个数?
或用函数COUNT来计算RANGE得记录个数?

解决方案 »

  1.   

    Sub a()
    Dim ws As WorksheetSet ws = Application.ActiveSheet
     MsgBox ws.UsedRange.Row + ws.UsedRange.Rows.Count - 1End Sub
      

  2.   

    请问老兄,我实验:
    Sub test()
    MsgBox ActiveSheet.UsedRange.Row +
    ActiveSheet.UsedRange.Rows.Count - 1MsgBox ActiveSheet.UsedRange.Rows.Count - 1End Sub
    前一个msgbox报告48,后一个报告49,但后一个是对的,为什么呢?
      

  3.   

    为什么不直接使用used.range.count 而要used.range.count-1加上一个值呢?
      

  4.   

    你打开一个空的Sheet,然后从中间开始放数据(不是第一行),那么用range.count只能得到所使用的行的数量,而不是最后被使用的那一行的行号