肿么用excel计算考勤?如:迟到时间、早退时间、加班时间

D1=if(B1>9/24,B1-9/24,"")
E1=if(C1<18/24,18/24-C1,"")
F1=if(C1>18/24,C1-18/24,"")

在机器里面设置好上下班时间即可。

迟到时间：=IF((B2-"9:00")<0,0,B2-"9:00")
早退时间：=IF((C2-"18:00")>0,0,"18:00"-C2)
加班时间：=IF(OR(WEEKDAY(A2,2)=6,WEEKDAY(A2,2)=7),C2-B2,IF((C2-"19:00")<0,0,C2-"19:00"))
不知道是不是你要的效果

您好！
1. 首先，科密考勤机无法改变迟到早退时间的颜色只能使用系统默认的颜色来区别。
2.考勤机供应商一般不会提供修改考勤系统颜色的权限如果您真的要修改那么就需和供应商联系看有何种方式可以解决但费用肯定也不会很低，应该比您买考勤机的价格高。
3.如果对您的迟到早退信息的查询和操作不会有影响那么建议您不要修改。
4.如果您的考勤数据是要导入到excel中去，那么可以在excel做迟到早退时时间颜色的修改。
希望对您有所帮助！

建立辅助列 输入正常上班时间和下班时间
插入一个窗体控件 按钮 输入下方代码
按按钮会自动生成 迟到 早退 和加班的时间 按分钟算的
以后你只需要在A列输入日期 B列输入上班时间 C列输入下班时间
按按钮即可

i = Range("a6000").End(xlUp).Rowi2 = Range("d6000").End(xlUp).Row + 1For n = i2 To iIf Range("b" & n).Value > Range("i2") ThenRange("d" & n).Value = Round((Range("b" & n).Value - Range("i2").Value) * 24 * 60, 0)ElseEnd IfNexti = Range("a6000").End(xlUp).Rowi2 = Range("e6000").End(xlUp).Row + 1For n = i2 To iIf Range("c" & n).Value < Range("j2") ThenRange("e" & n).Value = Round((Range("j2").Value - Range("c" & n).Value) * 24 * 60, 0)ElseEnd IfNexti = Range("a6000").End(xlUp).Rowi2 = Range("f6000").End(xlUp).Row + 1For n = i2 To iIf Range("c" & n).Value > Range("j2") ThenRange("f" & n).Value = Round((Range("c" & n).Value - Range("j2").Value) * 24 * 60, 0)ElseEnd IfNext