2020 年 9月 4 日随笔档案 - redufa

2020年9月4日

摘要：最后一个角度统计程序有问题： Sub tsh3() On Error Resume Next Sheets(1).Select: Call ts Sheets(2).Select: Call ts Sheets(3).Select: Call ts Sheets(4).Select: Call ts 阅读全文

posted @ 2020-09-04 02:04 redufa 阅读(175) 评论(0) 推荐(0)

工况统计程序1.0

摘要：工况统计 sub ts() a = Time n = Cells(Rows.Count, 2).End(xlUp).Row Call ts1(n): dq (n): Call qd b = Time - a MsgBox b, n End Sub Sub ts1(n) For i = 2 To n 阅读全文

posted @ 2020-09-04 01:31 redufa 阅读(190) 评论(0) 推荐(0)