Sub test():
    m = Range("a1").End(xlUp).Row
    m = ActiveSheet.UsedRange.Rows.Count
    MsgBox m
End Sub
最后修改：2020 年 08 月 24 日 11 : 40 PM
© 允许规范转载
如果觉得文章帮助了您，您可以随意赞赏。