如何用excel计算考勤?如:迟到时间,早退时间,加班时间。
创建辅助行?输入正常工作时间和下班时间。
插入表单控件按钮?在下面输入代码。
按下按钮会自动生成迟到早退加班的时间?每时每刻
以后只需要在A栏输入日期,B栏输入上班时间,c栏输入下班时间。
只要按下按钮
i =范围(“a6000”)。结束(xlUp)。排
i2 =范围(“d6000”)。结束(xlUp)。行+ 1
对于n = i2至I
If范围(" b " & ampn)。值& gt范围(" i2 ")然后
范围(" d " & ampn)。value = Round((Range(" b " & amp;n)。值域(“i2”)。值)* 24 * 60,0)
其他
如果…就会结束
然后
i =范围(“a6000”)。结束(xlUp)。排
i2 =范围(“e6000”)。结束(xlUp)。行+ 1
对于n = i2至I
If范围(" c " & ampn)。价值& lt范围(" j2 ")然后
范围(" e " & ampn)。Value = Round((Range("j2 ")。值域(" c " & ampn)。值)* 24 * 60,0)
其他
如果…就会结束
然后
i =范围(“a6000”)。结束(xlUp)。排
i2 =范围(“f6000”)。结束(xlUp)。行+ 1
对于n = i2至I
If范围(" c " & ampn)。值& gt范围(" j2 ")然后
范围(" f " & ampn)。value = Round((Range(" c " & amp;n)。值域(“j2”)。值)* 24 * 60,0)
其他
如果…就会结束
然后