excel表统计考勤次数

Question

上午8:30之前签到，下午3点之前签到，超过时间为无效
有效签到计算考勤分0.5分
重复记录不计分
表中9月22日至9月27日，共6天，每日考勤分按个人计算合计分
使用vba操作，这样我就一劳永逸啦，一共90多人呀
有请实力大侠！只要干的漂亮分全数份上。

Answer 1

数据描述有误，当上午8：30时以后的签到，同样符合15时前的签到要求。

请明确补充下午15时的判断标准：自12：00时起？还是13：00时起？还是没限制？

无需VBA编程，可利用增加辅助列的方式，编写合适的函数公式，取得类似效果：

1、在D列获得考勤对应的日期，公式：=INT(C2)，单元格属性：日期型；

2、在E列获得考勤当日的时间，公式：=MOD(C2,1)，单元格属性：时间型；

3、在F列组成考勤对应姓名和日期的新索引记录，公式：=B2&D2；

4、在G列填写符合考勤规则的初步积分，公式：

=IF(OR(AND(COUNTIF($D$2:$D2,D2)=1,OR(E2<=8/24,AND(E2>=12/24,E2<=15/24))),AND(COUNTIF($D$2:$D2,D2)<>1,OR(E2<=8/24,AND(E2>=12/24,E2<=15/24)))),0.5,0)

    其中：下午以12时为判断起始点；

5、在H列填写符合考勤规则的最终当日总积分，公式：

=IFERROR(IF(AND(COUNTIF(F:F,F2)>1,MATCH(F2,F:F,0)<>ROW()),"",MIN(SUMIF(F:F,F2,G:G),1)),"")

   积分填写于当日第一条记录，其他记录为空。

附图示意

Answer 2

D列作为“得分”项，D2写公式：
=IF(MOD(C2,1)*24<12,IF(MOD(C2,1)*24<8.5,0.5,0),IF(MOD(C2,1)*24<15,0.5,0))
下拉填充。
然后使用透视表统计各人的得分：
选中A:D区域，数据--数据透视表--布局（将“编号”、“姓名”拉进“行”，将“得分”拉进“数据”，选择统计方式“求和”，默认是计数啊）

Answer 3

发数据过来。wjp456789123@qq.com