绩效量化计算

divineson

shiruiqiang 发表于 2024-10-15 11:10
每个人的第二行数字代表啥？怎么计算？

表3只需提取员工每月1号到月末的班次代号与表1进行匹配换算得分并进行求和即可，表3内其他的数据都不需要的。

shiruiqiang

1\2\3都能搞好，数据自己验算，部分字段不齐，不能统计工作量。
后面的没去看，理解可能需要一点时间。

divineson

shiruiqiang 发表于 2024-10-15 15:05
1\2\3都能搞好，数据自己验算，部分字段不齐，不能统计工作量。
后面的没去看，理解可能需要一点时间。

无论结果如何都要感谢老师的帮忙，万分感谢，小红花已送上！

divineson

shiruiqiang 发表于 2024-10-15 15:05
1\2\3都能搞好，数据自己验算，部分字段不齐，不能统计工作量。
后面的没去看，理解可能需要一点时间。

老师你好，经过测算发现确实存在与原得分不相符的情况，要麻烦老师抽空看看，比原得分少的应该少算班次了，匹配表1班次代号时就类似公式中使用通配符，班次里含有表1代号的就按得分计入；得分比原来多的就找不出原因了，主要是代码自己能看懂的确实不多，如果老师方便的麻烦你再帮忙调一下，万分感谢！

shiruiqiang

具体来说一下，代码加了几句，直观一点。
先把工作转换成同一格式，分别计算。如图：

姓名和工号的下一行，就是工作量转换。

就算有“xx+xx”也能计算。


同时，第一张表和第三张表部分工作不统一或者无，我先前说过。
如：农长D在表1中没有，只有农长D1，这种不能计算。需要规范

shiruiqiang

divineson 发表于 2024-10-15 22:59
老师你好，经过测算发现确实存在与原得分不相符的情况，要麻烦老师抽空看看，比原得分少的应该少算班次了 ...

15楼的代码就是验算，具体分值差别就需要你核对一下逻辑了

divineson

shiruiqiang 发表于 2024-10-16 06:35
具体来说一下，代码加了几句，直观一点。
先把工作转换成同一格式，分别计算。如图：

明白了，感谢老师的细心指导；另外，还想询问一下，是否运行了这个宏后，表3所有单元格的公式都会被清除，除J列外，其他单元格的公式能否保留下来，不然这表就废了，麻烦老师再调整一下，万分感谢！

shiruiqiang

divineson 发表于 2024-10-16 09:55
明白了，感谢老师的细心指导；另外，还想询问一下，是否运行了这个宏后，表3所有单元格的公式都会被清除 ...

crr = Sheets(2).[a1].CurrentRegion.Formula
保留公式了。
不过都vba处理了，建议直接代码吧
后面附件写的代码是验算用的

shiruiqiang

4、”表2劳动工作量得分“表中A列至G列均为跨表使用公式提取数据，人员多了也影响运行速度，希望也能改为VBA提取数据，其中A、F、G三列数据在“表3本月考勤记录”中提取，B、C、D、E四列均在“表7员工基础信息”中提取，B至G列均以A列（员工编号）进行数据匹配。


计算口径不知道，大致看了还是比较简单。

divineson

shiruiqiang 发表于 2024-10-16 11:23
crr = Sheets(2).[a1].CurrentRegion.Formula
保留公式了。
不过都vba处理了，建议直接代码吧

感谢老师一如继往的耐心指导，其实我也是很想把整个表格化用VBA处理，但公式实在太多了，难以把需求一一讲清楚，就连这个计算得分也不是最终所需结果，最终需求还需完成两个功能：
1）表3 I 列手动录入分值后，J列能自动相加
2）J列最终的计算方式是：表3人员岗位（E列）与表1班次岗位（T列）相同时，得分按表1 S列计算；岗位不相同时，如表1 I列为空值（即0）得分为1，否则得分为1.3。
例子：一位值班站长上了值班员的班（农C1），因本职岗位与班次岗位不一致且表1该班次对应I列为空，故得分为1分，如上的是（农C2），表1 I列非空则得分为1.3。通俗点就是：本职岗位与班次岗位不一致时，得分就是表1的H列+I列。
不知道VBA能不能实现这样的计算，麻烦老师看看，实在不行只能是代码+手动计算了。