欢迎来到我的博客,本人把技术和生活随想都积累并分享在这里,很高兴遇见你,和你一同进步。
摘要: Sub CountTest() Dim mycount As Integer, rng As Range For Each rng In Range("A1:B50") If rng.Value > 1000 Then mycount = mycount + 1 Next MsgBox "大于100 阅读全文
posted @ 2020-07-24 20:38 Yusuf1111 阅读(580) 评论(0) 推荐(0)