Sub test():
    m = Range("a1").End(xlUp).Row
    m = ActiveSheet.UsedRange.Rows.Count
    MsgBox m
End Sub
Last modification：August 24th, 2020 at 11:40 pm
© 允许规范转载
如果觉得我的文章对你有用，可以请我喝杯咖啡。