一种基于EXCEL软件的员工绩效打分和工资计算系统

技术领域

本发明涉及员工绩效打分和工资计算领域，具体为一种基于EXCEL软件的员工绩效打分和工资计算系统。

背景技术

员工绩效评价是企业人力资源管理的重要环节，对于整车制造企业，尤其是其工程技术人员聚集最多的产品开发部门，员工绩效评价无法仅通过考勤打卡或其他简单指标来实现，需要各级领导干部结合多方面因素综合评判。巨大的人员数量、复杂的评价方法以及在此基础上繁琐的数据处理工作使得员工绩效评价成为了中基层干部每月都要面对的“难关”。

在进行绩效评价的过程中有如下困难点：

1)员工花名册更新后，需要手动调整评价表，费时费力；

2)因疏忽大意、没有看清、按错键等原因出现人员遗漏、人员错位、评价遗漏，工资计算错误等问题；

3)个别中基层干部违反公司规定，利用漏洞偷偷将员工绩效分数调高，使得整个部门比例超标，给公司高层带来了困扰。

由于公司管理制度的特殊性，无法直接采用市面上通用的绩效评价软件，而定制开发的成本过高，是公司难以接受的。

发明内容

为解决上述技术问题，本发明提供以下的技术方案：

本发明提供了一种基于EXCEL软件的员工绩效打分和工资计算系统，

包括科室经理绩效评价系统、绩效工资发放系统，

科室经理使用所述科室经理绩效评价系统完成本科室绩效评价，发送给部门长；然后，部门长收集各科室绩效评价后，使用所述绩效工资发放系统汇总调整并生成工资表，发布给人事部。

优选的，所述科室经理绩效评价系统主体设置为一个xlsm文件，所述文件包含“1月”、“员工花名册”、“年中汇总”、“年终汇总”四张工作表，在使用过程中会添加新的月份工作表；该文件还包含1个用户窗体UserForm1，作为主操作界面。

优选的，科室经理在每月底/年中/年终使用科室经理绩效评价系统对本科室的员工进行评价，并发送给部门长，

所述科室经理绩效评价系统包括以下步骤：

2.1：启动程序，

打开系统主体的xlsm文件，在启用宏功能后操作界面会自动弹出；

2.2：更新花名册

2.2.1当人员发生变动需要更新信息时，点击【更新花名册】按钮→

2.2.2后台程序自动将保护状态的【员工花名册】输入密码解除保护，并删除原表→

2.2.3弹出文件选择窗体，设定只能单选，选取更新后的人员花名册文件和/或工作簿，点击确定，打开文件→

2.2.4激活“员工花名册”工作表→

2.2.5使用循环语句算出最大科室人数→

2.2.6对位复制粘贴科室、人员、修改日期→

2.2.7使用循环语句计算end(xldown)所选单元格数量来得到各科室人数，然后更新到各科室名称上方，再循环计算得出开发中心的总人数→

2.2.8按照前面算出的最大科室人数填充“序号”列→

2.2.9调整格式后保护工作表，以防更改；

2.3:借调历史数据

2.3.1当需要借用历史数据时，点击【升级数据搬运工】按钮→

2.3.2弹出文件选择窗体，设定只能单选，选取评价表文件，点击确定→

2.3.3为防止文件重名导致运行出错，先将当前运行文件名称与所选文件名称进行比较，不同则直接打开，相同则先将所选文件改名为“原名_bak”，然后打开→

2.3.4将所打开文件的“1月”工作表中的科室名与当前文件“1月”工作表中的科室名比较，如不相等，判定为不匹配，关闭该文件，退出本次操作；如相等，将该文件的数据复制到当前文件；

2.4：选择要评价的科室和月份

2.4.1为了设定一个子程序LB_data_ready供调用，包含一个重要参数exist，exist＝0，表示选择的月份不存在，将新建一张以该月命名的工作表；exist＝1，表示选择的月份存在，将调用和修改现有工作表上的数据；exist＝2，表示要审查的是汇总(年中/年终))模块；exist＝3，表示选择新的科室，定义一个变量m＝6，用来指示ListBox1要显示的列数；

2.4.2操作界面UserForm1设置有一个ComboBox1组合框用来选择科室，见图2，在UserForm_Initialize中设定从花名册中抓取科室作为ComboBox1下拉菜单的选项，并设定工作表“1月”的科室为默认科室；

2.4.3当点击ComboBox1选择一个科室时，将此时ComboBox1中的值与当前工作表中科室的值对比，如相等，不发生变化；如不相等，判断为选择了一个新科室→

2.4.4弹出选择框，提示选择新科室会新建一个文件，选“否”取消，选“是”，保存当前文件→

2.4.5exist的值变成3，删除“1月”外的所有月的工作表，并根据当前日期重命名当前工作簿→

2.4.6接着，用Call调用LB_data_ready，因exist＝3，执行对应程序：

1)定义一个Range型变量rngs将其定位在“员工花名册”中ComboBox1所选科室的所有人员的单元格区域→

2)定义一个变量k用来计算rngs的总行数，也就是科室人数→

3)定义一个二维数组arr(k-1,m-1)用来存放ListBox1要显示的数据→

4)使用双重循环语句填充数组，将序号，姓名和所属科室填入，绩效评分、绩效终评、备注列设为空以待填充→

5)将ListBox1的数据源初始化→

6)将数组导入ListBox1，设置文本居中对齐→

7)通过当前工作页表头宽度计算ListBox1的各列宽度→

8)选中首行→

9)通过循环重新刷新TextBox1至6的内容；

2.4.7调用完LB_data_ready程序，将选择的科室、年、月等一系列信息提取到当前工作表(x月、年中汇总、年终汇总)中，做好表头，之后将文件另存为新科室的绩效考评文件；

2.4.8还有一个ComboBox2组合框用来选择月份，自动识别系统日期给出1月到当前月的下拉菜单选项，最下方给出两个选项“年中汇总”和“年终汇总”；

2.4.9当exist＝3时，此时正是刚新建一个科室文件时，ComboBox2的程序处于静默状态，需要点击ComboBox2选择要评审的月份才开始运作；

2.4.10当选择“年中汇总”或“年终汇总”时，令exist＝2，根据ComboBox2的选项激活“年中汇总”或“年终汇总”工作表，并调用LB_data_ready→

2.4.11因exist＝2，执行对应程序：

1)使用冒泡法对所有月份的工作表进行排序→

2)设置一个参数temp，当ComboBox2选择“年中汇总”时，令temp＝6，否则temp＝等于12→

3)使用循环语句，对所有小于等于temp的月，抓取工作表中的人员姓名，输入Uniqueitem集合中，并使用On Error语句来防止重复项→

4)将Uniqueitem集合中的元素数量(即汇总的人员数量)赋给变量k→

5)定义一个二维数组arr_b(1To k,1To 4)，四列分别存储姓名、进公司月份、出公司月份、工期(月)，并将其初始化→

6)记录员工入职/离职时间，具体流程见图4→

7)定义一个二维数组arr(k-1,m-1)用来存放ListBox1要显示的数据→

8)使用双重循环语句填充数组，将序号，姓名和所属科室填入，绩效评分、领导调整、绩效终评设为空以待填充→

9)计算员工(年中/年终)汇总平均分，具体流程见图5；

10)将ListBox1的数据源初始化→

11)将数组导入ListBox1，设置文本居中对齐→

12)通过当前工作页表头宽度计算ListBox1的各列宽度→

13)选中首行→

14)通过循环重新刷新TextBox1至6的内容；

2.4.12如要在ComboBox2中选择月份，有两种方式，一是点击下拉菜单，二是直接输入月份，这里做了便捷化的设计，只需要输入数字，就会自动在后面加上“月”，并做了防错设计，“月”后面多余的字符会被自动删除；

2.4.13在ComboBox2中选择月份→

2.4.14在工作簿中遍历所有工作表，寻找与ComboBox2中所选月份同名的工作表→

2.4.15如果找到，令exist＝1，激活已存在的工作表，并调用LB_data_ready，将已存在数据导入ListBox1，方法同上不再赘述；

2.4.16如果没有找到，令exist＝0，并调用LB_data_ready，过程同2.4.7；

2.5：打分

2.5.1打分有两种方式，一是在UserForm1界面中，在ListBox1中选择人员，然后在TextBox4、6中输入；二是在UserForm1界面点击【确定】键cmdOK后在工作表中输入；

2.5.2打分时设置了防错程序，一是对[0,100]区间以外的数据进行拦截，阻止输入，二是封锁科室经理给自己打分的权限，打分会在备注栏显示提示语并阻止数据输入。

优选的，所述绩效工资发放系统主体设置为一个xlsm文件，所述文件包含“软件使用说明”、“月奖参数”、“分配明细”、“历史数据”、“绩效审核”、“邮件数据”、“部门设置”工作表；并包含“主选菜单”、“月奖参数设置”、“绩效评价科室汇总”、“评价审查模块”、“绩效工资计算”、“数据发布”等六个窗体。

优选的，部门长在每月底/年中/年终汇总各科室的评价表，可调整评价分数，完成工资和奖金发放方案，并发布给公司人事部，

所述绩效工资发放系统包括以下步骤：

4.1：启动程序

打开文件，启用宏功能，自动弹出主选菜单，

所述绩效工资发放系统的文件7张工作表的作用如下：

【软件使用说明】简要阐述了该软件的操作方法；

【月奖参数】用于存放部门和人资下发的月奖参数；

【分配明细】用于存放工资分配明细表，并设有程序启动按钮；

【历史数据】用于存放工资发放的历史数据；

【绩效审核】用于存放部门汇总的绩效评价表；

【邮件数据】用于存放邮件的发送地址和人员；

【部门设置】用于存放部门组织架构数据；

4.2：更新月奖参数

4.2.1点击【人资下发的月奖参数】按钮，进入月奖参数设置界面，

4.2.2点击组合框ComboBox1，选择部门，选项来源于【部门设置】工作表→

4.2.3在TextBox1-5中输入人事部下发的部门参数→

4.2.4点击【放弃】，放弃本次设置并回到主选菜单；

4.2.5点击【确定】，将所选部门和修改后的参数写回【月奖参数】工作表，并回到主选菜单；

4.3导入各科室评价

4.3.1点击【获取部门绩效评价】，进入绩效评价科室汇总界面，

4.3.2TextBox2将映射出【月奖参数】工作表中的部门名称，不可编辑；

4.3.3ComboBox2选择要汇总的月；

4.3.4点击【浏览】可选择文件位置，选择结果将在TextBox1中呈现，默认为当前文件所在位置；

4.3.5ComboBox1可选择要查找的文件后缀；

4.3.6设置有一个子程序List_Box_Frash，用于将限定路径和后缀筛选出来的文件列表刷写到ListBox1中；

4.3.7设置有一个子程序light_department，用于识别和选中当前部门的科室文件，并报告未提交评价表的科室；

4.3.8设置有一个子程序arrow_click，用于实现

4.3.9选择文件位置后，调用List_Box_Frash刷新ListBox1中的列表，调用light_department选中当前部门的科室文件，并报告未提交评价表的科室；

4.3.10点击

4.3.11CheckBox1是追加模式开关，不选中则代表按新建处理，在点击【科室汇总】时会将【绩效审核】工作表中的原有数据清空；

4.3.12点击【科室汇总】，开始遍历ListBox2中文件，检查科室与月份是否匹配→

4.3.13如不匹配将报警并终止操作；

4.3.14如匹配，将汇总数据输入【绩效审核】工作表；

4.4评价审查

4.4.1评价审查模块的主体结构和运行原理与2.4、2.5相似，故不再赘述，

4.4.2点击【完成】后，将终评数据输送到【分配明细】工作表；

4.5计算绩效工资

4.5.1在主选菜单点击【计算绩效工资】，进入绩效工资计算界面；

4.5.2点击ComboBox1，选择要发放的月份，默认选项为1月到当前月和年中汇总、年终汇总；

4.5.3程序自动将【月奖参数】页的数据投射到TextBox1-6；

4.5.4TextBox7-11为各评价级别分配绩效工资的比例，可手动调整，程序设置有一组缺省值，通过点击ToggleButton1，可将其写入TextBox7-11；

4.5.5点击【奖金分配】，根据【分配明细】工作表中的评级和TextBox7-11中百分数计算出所有人员的绩效工资，零头随机分配，并将分配结果写回【分配明细】工作表，再次点击【奖金分配】可以随机切换零头获得者；

4.5.6选中CheckBox1，则不会给评价为空的员工分配奖金和零头；

4.5.7当人资下发的部门绩效标准总和(TextBox2)与实际分配结果不相等时，弹出错误提示框，阻止写入分配结果；

4.6发布

4.6.1完成奖金发布后，需要将分配结果发布给人事部，在发布前需在TextBox13和TextBox14输入密码确认，如果忘记密码，点击ToggleButton2也可以自动输入缺省密码；

4.6.2输入密码后，点击【数据发布】，根据当前数据创建一张xlsx格式的工作簿，命名为“xxxx年xx月绩效工资发布告-xx部”，将【分配明细】表数据输入其中，保存，进入数据发布界面；

4.6.3主题存放于TextBox1中，默认为“xx部xxxx年xx月绩效工资发放明细表”，由之前所选部门和年月决定，不可编辑；

4.6.4邮件内容存放于TextBox7，默认为空，可编辑；

4.6.5附件名称存放于TextBox2，默认为“xxxx年xx月绩效工资发布告-xx部”由之前所选部门和年月决定，不可编辑；

4.6.6主送、抄送人地址、姓名从【邮件数据】工作表投射到TextBox3-6中，默认为不可编辑状态，点击ToggleButton1和ToggleButton2可以将其转为可编辑状态；

4.6.7点击【确认发布】，打开Outlook软件，以按照上述内容创建一封邮件，将2.6.2创建的工作簿文件作为附件，发送；如果勾选了CheckBox1，则该邮件不会发出，而是作为草稿保存；

4.6.8点击【放弃】，放弃本次操作，关闭所有操作界面。

本发明有益效果

(1)本发明提出的产品主要由两个启用宏的工作簿文件组成，每个大小不超过500KB，无需安装，只要是装有office2016的电脑都可以使用，对电脑的运行负担也小，比起那些动辄上百兆的软件要灵活方便许多。

(2)本发明提出的产品对于公司的组织架构和管理运营方式都做到了精准适配，具有运行环境要求低、操作简单、防错性强、自动化程度高等优点。

附图说明

图1为本发明科室经理绩效评价系统工作流程图。

图2为本发明科室经理绩效评价系统操作界面示意图。

图3为本发明记录员工入职/离职时间流程图。

图4为本发明计算员工(年中/年终)汇总平均分流程图。

图5为本发明部门长程序工作流程图。

图6为本发明主选菜单界面图。

图7为本发明奖参数设置界面图。

图8为本发明绩效评价科室汇总界面图。

图9为本发明评价审查模块界面图。

图10为本发明绩效工资计算界面图。

图11为本发明数据发布界面图。

具体实施方式

下面将结合本发明的实施例中的附图，对本发明的实施例中的技术方案进行清楚、完整地描述，显然，所描述的实施例仅仅是本发明一部分实施例，而不是全部的实施例。基于本发明中的实施例，本领域普通技术人员在没有做出创造性劳动前提下所获得的所有其他实施例，都属于本发明保护的范围。

实施例1

如图1-图11所示，本发明提供了一种基于EXCEL软件的员工绩效打分和工资计算系统，

包括科室经理绩效评价系统、绩效工资发放系统，

科室经理使用所述科室经理绩效评价系统完成本科室绩效评价，发送给部门长；然后，部门长收集各科室绩效评价后，使用所述绩效工资发放系统汇总调整并生成工资表，发布给人事部，

所述科室经理绩效评价系统主体设置为一个xlsm文件，所述文件包含“1月”、“员工花名册”、“年中汇总”、“年终汇总”四张工作表，在使用过程中会添加新的月份工作表；该文件还包含1个用户窗体UserForm1，作为主操作界面，科室经理在每月底/年中/年终使用科室经理绩效评价系统对本科室的员工进行评价，并发送给部门长，“员工花名册”可自动导入员工花名册，无需复制粘贴，无需人工检查核对；自动更新日期和人数，并可视化；

所述科室经理绩效评价系统包括以下步骤，

2.1：启动程序，

打开系统主体的xlsm文件，在启用宏功能后操作界面会自动弹出；

2.2：更新花名册

2.2.1当人员发生变动需要更新信息时，点击【更新花名册】按钮→

2.2.2后台程序自动将保护状态的【员工花名册】输入密码解除保护，并删除原表→

2.2.3弹出文件选择窗体，设定只能单选，选取更新后的人员花名册文件和/或工作簿，点击确定，打开文件→

2.2.4激活“员工花名册”工作表→

2.2.5使用循环语句算出最大科室人数→

2.2.6对位复制粘贴科室、人员、修改日期→

2.2.7使用循环语句计算end(xldown)所选单元格数量来得到各科室人数，然后更新到各科室名称上方，再循环计算得出开发中心的总人数→

2.2.8按照前面算出的最大科室人数填充“序号”列→

2.2.9调整格式后保护工作表，以防更改；

2.3:借调历史数据，可自动导入历史评价数据，提高了效率

2.3.1当需要借用历史数据时，点击【升级数据搬运工】按钮→

2.3.2弹出文件选择窗体，设定只能单选，选取评价表文件，点击确定→，评价表文件自动抓取花名册数据生成评价表，根据所选科室和月份的不同自动完成对应操作；

2.3.3为防止文件重名导致运行出错，先将当前运行文件名称与所选文件名称进行比较，不同则直接打开，相同则先将所选文件改名为“原名_bak”，然后打开→

2.3.4将所打开文件的“1月”工作表中的科室名与当前文件“1月”工作表中的科室名比较，如不相等，判定为不匹配，关闭该文件，退出本次操作；如相等，将该文件的数据复制到当前文件；

2.4：选择要评价的科室和月份

2.4.1为了设定一个子程序LB_data_ready供调用，包含一个重要参数exist，exist＝0，表示选择的月份不存在，将新建一张以该月命名的工作表；exist＝1，表示选择的月份存在，将调用和修改现有工作表上的数据；exist＝2，表示要审查的是汇总(年中/年终))模块；exist＝3，表示选择新的科室，定义一个变量m＝6，用来指示ListBox1要显示的列数；

2.4.2操作界面UserForm1设置有一个ComboBox1组合框用来选择科室，见图2，在UserForm_Initialize中设定从花名册中抓取科室作为ComboBox1下拉菜单的选项，并设定工作表“1月”的科室为默认科室；

2.4.3当点击ComboBox1选择一个科室时，将此时ComboBox1中的值与当前工作表中科室的值对比，如相等，不发生变化；如不相等，判断为选择了一个新科室→

2.4.4弹出选择框，提示选择新科室会新建一个文件，选“否”取消，选“是”，保存当前文件→

2.4.5exist的值变成3，删除“1月”外的所有月的工作表，并根据当前日期重命名当前工作簿→

2.4.6接着，用Call调用LB_data_ready，因exist＝3，执行对应程序：

1)定义一个Range型变量rngs将其定位在“员工花名册”中ComboBox1所选科室的所有人员的单元格区域→

2)定义一个变量k用来计算rngs的总行数，也就是科室人数→

3)定义一个二维数组arr(k-1,m-1)用来存放ListBox1要显示的数据→

4)使用双重循环语句填充数组，将序号，姓名和所属科室填入，绩效评分、绩效终评、备注列设为空以待填充→，绩效评分可根据分数自动划定评价级别，并统计不同级别的人数，与设定比例标准比较，超标突出显示，防止人数超标；比例标准可调整；自动汇总年中/年终评分，经理可调整最终评分，

5)将ListBox1的数据源初始化→

6)将数组导入ListBox1，设置文本居中对齐→

7)通过当前工作页表头宽度计算ListBox1的各列宽度→

8)选中首行→

9)通过循环重新刷新TextBox1至6的内容；

2.4.7调用完LB_data_ready程序，将选择的科室、年、月等一系列信息提取到当前工作表(x月、年中汇总、年终汇总)中，做好表头，之后将文件另存为新科室的绩效考评文件；

2.4.8还有一个ComboBox2组合框用来选择月份，自动识别系统日期给出1月到当前月的下拉菜单选项，最下方给出两个选项“年中汇总”和“年终汇总”；

2.4.9当exist＝3时，此时正是刚新建一个科室文件时，ComboBox2的程序处于静默状态，需要点击ComboBox2选择要评审的月份才开始运作；

2.4.10当选择“年中汇总”或“年终汇总”时，令exist＝2，根据ComboBox2的选项激活“年中汇总”或“年终汇总”工作表，并调用LB_data_ready→

2.4.11因exist＝2，执行对应程序：

1)使用冒泡法对所有月份的工作表进行排序→

2)设置一个参数temp，当ComboBox2选择“年中汇总”时，令temp＝6，否则temp＝等于12→

3)使用循环语句，对所有小于等于temp的月，抓取工作表中的人员姓名，输入Uniqueitem集合中，并使用On Error语句来防止重复项→

4)将Uniqueitem集合中的元素数量(即汇总的人员数量)赋给变量k→

5)定义一个二维数组arr_b(1To k,1To 4)，四列分别存储姓名、进公司月份、出公司月份、工期(月)，并将其初始化→

6)记录员工入职/离职时间，具体流程见图4→

7)定义一个二维数组arr(k-1,m-1)用来存放ListBox1要显示的数据→

8)使用双重循环语句填充数组，将序号，姓名和所属科室填入，绩效评分、领导调整、绩效终评设为空以待填充→

9)计算员工(年中/年终)汇总平均分，具体流程见图5；

10)将ListBox1的数据源初始化→

11)将数组导入ListBox1，设置文本居中对齐→

12)通过当前工作页表头宽度计算ListBox1的各列宽度→

13)选中首行→

14)通过循环重新刷新TextBox1至6的内容；

2.4.12如要在ComboBox2中选择月份，有两种方式，一是点击下拉菜单，二是直接输入月份，这里做了便捷化的设计，只需要输入数字，就会自动在后面加上“月”，并做了防错设计，“月”后面多余的字符会被自动删除；

2.4.13在ComboBox2中选择月份→

2.4.14在工作簿中遍历所有工作表，寻找与ComboBox2中所选月份同名的工作表→

2.4.15如果找到，令exist＝1，激活已存在的工作表，并调用LB_data_ready，将已存在数据导入ListBox1，方法同上不再赘述；

2.4.16如果没有找到，令exist＝0，并调用LB_data_ready，过程同2.4.7；

2.5：打分

2.5.1打分有两种方式，一是在UserForm1界面中，在ListBox1中选择人员，然后在TextBox4、6中输入；二是在UserForm1界面点击【确定】键cmdOK后在工作表中输入；

2.5.2打分时设置了防错程序，一是对[0,100]区间以外的数据进行拦截，阻止输入，二是封锁科室经理给自己打分的权限，打分会在备注栏显示提示语并阻止数据输入，打分防错程序在经理和部门长的打分功能模块设置有打分防错程序，拦截非法输入，拦截经理给自己打分；

所述绩效工资发放系统主体设置为一个xlsm文件，所述文件包含“软件使用说明”、“月奖参数”、“分配明细”、“历史数据”、“绩效审核”、“邮件数据”、“部门设置”工作表；并包含“主选菜单”、“月奖参数设置”、“绩效评价科室汇总”、“评价审查模块”、“绩效工资计算”、“数据发布”等六个窗体，部门长在每月底/年中/年终汇总各科室的评价表，部门评价表汇总可根据组织架构设置和所选月份自动识别本部门所属科室的评价表文件，一键导入生成部门汇总评价表，可调整评价分数，完成工资和奖金发放方案，并发布给公司人事部，

所述绩效工资发放系统包括以下步骤：

4.1：启动程序

打开文件，启用宏功能，自动弹出主选菜单，

所述绩效工资发放系统的文件7张工作表的作用如下：

【软件使用说明】简要阐述了该软件的操作方法；

【月奖参数】用于存放部门和人资下发的月奖参数；

【分配明细】用于存放工资分配明细表，并设有程序启动按钮；

【历史数据】用于存放工资发放的历史数据；

【绩效审核】用于存放部门汇总的绩效评价表；

【邮件数据】用于存放邮件的发送地址和人员；

【部门设置】用于存放部门组织架构数据；

4.2：更新月奖参数

4.2.1点击【人资下发的月奖参数】按钮，进入月奖参数设置界面，

4.2.2点击组合框ComboBox1，选择部门，选项来源于【部门设置】工作表→

4.2.3在TextBox1-5中输入人事部下发的部门参数→

4.2.4点击【放弃】，放弃本次设置并回到主选菜单；

4.2.5点击【确定】，将所选部门和修改后的参数写回【月奖参数】工作表，并回到主选菜单；

4.3导入各科室评价

4.3.1点击【获取部门绩效评价】，进入绩效评价科室汇总界面，

4.3.2TextBox2将映射出【月奖参数】工作表中的部门名称，不可编辑；

4.3.3ComboBox2选择要汇总的月；

4.3.4点击【浏览】可选择文件位置，选择结果将在TextBox1中呈现，默认为当前文件所在位置；

4.3.5ComboBox1可选择要查找的文件后缀；

4.3.6设置有一个子程序List_Box_Frash，用于将限定路径和后缀筛选出来的文件列表刷写到ListBox1中；

4.3.7设置有一个子程序light_department，用于识别和选中当前部门的科室文件，并报告未提交评价表的科室；

4.3.8设置有一个子程序arrow_click，用于实现

4.3.9选择文件位置后，调用List_Box_Frash刷新ListBox1中的列表，调用light_department选中当前部门的科室文件，并报告未提交评价表的科室，评价表评审模块，部门长可查看所有员工评分评级，可调整最终评分，可检查评级比例是否超标，可调整评级比例标准；必须经评审后才能进入工资发放模块，防止人数超标；

4.3.10点击

4.3.11CheckBox1是追加模式开关，不选中则代表按新建处理，在点击【科室汇总】时会将【绩效审核】工作表中的原有数据清空；

4.3.12点击【科室汇总】，开始遍历ListBox2中文件，检查科室与月份是否匹配→

4.3.13如不匹配将报警并终止操作；

4.3.14如匹配，将汇总数据输入【绩效审核】工作表；

4.4评价审查

4.4.1评价审查模块的主体结构和运行原理与2.4、2.5相似，故不再赘述，

4.4.2点击【完成】后，将终评数据输送到【分配明细】工作表；

4.5计算绩效工资

4.5.1在主选菜单点击【计算绩效工资】，进入绩效工资计算界面，工资计算可设置不同评价级别的分配比例，能够灵活地按照部门薪资策略来调整；设置了密码/缺省发布的功能，即能防错，又不会因忘记密码影响工作；

4.5.2点击ComboBox1，选择要发放的月份，默认选项为1月到当前月和年中汇总、年终汇总；

4.5.3程序自动将【月奖参数】页的数据投射到TextBox1-6；

4.5.4TextBox7-11为各评价级别分配绩效工资的比例，可手动调整，程序设置有一组缺省值，通过点击ToggleButton1，可将其写入TextBox7-11；

4.5.5点击【奖金分配】，根据【分配明细】工作表中的评级和TextBox7-11中百分数计算出所有人员的绩效工资，零头随机分配，并将分配结果写回【分配明细】工作表，再次点击【奖金分配】可以随机切换零头获得者，部门奖金可选择部门，可根据每月人事部下发的奖金参数设置和修改；

4.5.6选中CheckBox1，则不会给评价为空的员工分配奖金和零头；

4.5.7当人资下发的部门绩效标准总和(TextBox2)与实际分配结果不相等时，弹出错误提示框，阻止写入分配结果；

4.6发布

4.6.1完成奖金发布后，需要将分配结果发布给人事部，在发布前需在TextBox13和TextBox14输入密码确认，如果忘记密码，点击ToggleButton2也可以自动输入缺省密码；

4.6.2输入密码后，点击【数据发布】，根据当前数据创建一张xlsx格式的工作簿，命名为“xxxx年xx月绩效工资发布告-xx部”，将【分配明细】表数据输入其中，保存，进入数据发布界面，数据发布可自动发邮件，减少了操作步骤，节省了时间和精力；

4.6.3主题存放于TextBox1中，默认为“xx部xxxx年xx月绩效工资发放明细表”，由之前所选部门和年月决定，不可编辑；

4.6.4邮件内容存放于TextBox7，默认为空，可编辑；

4.6.5附件名称存放于TextBox2，默认为“xxxx年xx月绩效工资发布告-xx部”由之前所选部门和年月决定，不可编辑；

4.6.6主送、抄送人地址、姓名从【邮件数据】工作表投射到TextBox3-6中，默认为不可编辑状态，点击ToggleButton1和ToggleButton2可以将其转为可编辑状态；

4.6.7点击【确认发布】，打开Outlook软件，以按照上述内容创建一封邮件，将2.6.2创建的工作簿文件作为附件，发送；如果勾选了CheckBox1，则该邮件不会发出，而是作为草稿保存；

4.6.8点击【放弃】，放弃本次操作，关闭所有操作界面；

实施例2

如图1-图11所示，本实施例是在实施例1的基础上做出的进一步优化，具体的是，例如，

现进行x部(下属甲、乙、丙科室)2020年5月的绩效评价和工资发放

一、人事部将更新花名册发给甲、乙、丙科室经理，将5月奖金参数发给x部门长；

二、甲/乙/丙科室经理打开【科室经理绩效评价系统】，自动弹出操作界面；

三、点击【更新员工花名册】按钮，选择人事部发来的更新花名册，点击【确定】，自动导入；

四、选择“甲/乙/丙科室”，选择“5月”，自动生成名为“5月”的评价表，并投射到主操作界面；

五、在主操作界面或工作表上打分；

六、保存当前评价表文件，发给部门长；

七、x部门长收集甲、乙、丙科室的评价表，放在【绩效工资发放系统】所在文件夹位置；

八、x部门长打开【绩效工资发放系统】，主选菜单自动弹出；

九、点击【人资下发的月奖参数】按钮，进入月奖参数设置界面，选择x部，将5月奖金参数更新上去；

十、点击【获取部门绩效评价】，进入【绩效评价科室汇总】界面，选择要汇总的月份；

十一、系统识别到甲、乙、丙科室评价表，自动点亮，点击

十二、点击【评价审查】按钮，进入【评价审查模块】界面，进行评价审查，点击【完成】，自动将最终评价数据输入【分配明细】工作表；

十三、在主选菜单点击【计算绩效工资】，进入【绩效工资计算模块】，选择发放月份，可调整各级分配百分比，点击【奖金分配】，自动完成所有员工的绩效工资计算并写入【分配明细】工作表；

十四、输入密码，点击【数据发布】，新建一个工作簿，将【分配明细】工作表复制进去，保存，进入【数据发布】界面，可编辑内容和收件人，点击【确认发布】，自动打开Outlook文件，生成邮件，将并发送。

最后应说明的是：以上所述仅为本发明的优选实施例而已，并不用于限制本发明，尽管参照前述实施例对本发明进行了详细的说明，对于本领域的技术人员来说，其依然可以对前述各实施例所记载的技术方案进行修改，或者对其中部分技术特征进行等同替换,凡在本发明的精神和原则之内，所作的任何修改、等同替换、改进等，均应包含在本发明的保护范围之内。