求助：代码运算速度提升

htron

各位大神：
小弟初学VBA，现在正在做一个每月加班时间统计的小程序。
部门170多人，一个月内每天的考勤情况都在一张表里（5000多行），设计思路如下：
1.在当前sheet后插入新表“加班汇总表”
2.将考勤数据源表中的人名（C列）拷入新表中，并去掉重复项。
3.统计每个人考勤数据源表中加班时长大于0.5小时项并求和，放在新表中的B列对应位置。
程序如附件所示
运行下来，感觉时间有点长（近30s），求教大神，不知道有什么方法可以简化程序？

gshzhexcel

我觉得用数组来做就应该会快很多，光有代码，没文件不好调试！

怪兽不乖丨Si

楼主，没有附件，只是看了下你的代码，给你几个建议
1. 使用with代替重复调用的对象
2. 把数据存入多维数组中，对数组做处理而不是对工作表，单元格。
做好这两点，你的程序应该就能快很多，很多。