基于Excel VBA的教师人事档案系统界面设计

2021-01-06冯秀玲

中国教育技术装备 2021年19期

冯秀玲

摘要利用Excel VBA开发教师人事档案系统简单实用，可以使人事档案管理自动化，快速有效地对教师基本情况、月考勤、考核、工资发放进行管理，合理控制人事管理的每一个环节，实现高效管理、科学管理、智能管理和实时管理，更好地使资源共享化，简化常规工作，提高学校管理水平、教学质量和整体教学水平。本系统的使用很大程度上方便了学校的人事管理，简单、快捷、自动化。

关键词学校管理;人事管理;Excel VBA;人事档案;人事档案系统

中图分类号：TP311.51 文献标识码：B

文章编号：1671-489X（2021）19-0033-03

0 概述

人事管理是学校管理的关键。教师人事档案管理是学校人事管理的一部分，教师涉及的角色众多且事务繁杂，使用信息化管理工具对学校教师人事信息进行合理全面的管理是有必要的，也是必然趋势。教师人事管理系统能够给学校领导者提供人事信息的实时查询和修改，并且具有一定的統计功能，使得领导者能够随时了解学校人事动态，给学校管理者提供一个高效全面的信息化平台，帮助管理者提高工作效率。本文以某高校人事档案系统的管理为模型，运用Excel开发一套教师人事档案系统。

Excel是微软公司Microsoft Office系列软件中很重要的一部分，功能十分强大，运用十分广泛，操作简单且易于实现，比起其他的应用程序比较容易掌握，目前是比较流行的办公应用软件之一。在日常工作以及生活中可以利用Excel进行数据统计、计算和分析，还可以利用Excel VBA开发语言处理比较复杂的问题。

VBA（Visual Basic for Application）是一种嵌入式编程语言，建立在VB（Visual Basic）这种可视化编程语言基础上，增加了对象控制功能，使得Excel对数据的处理更加自动化。再则，VBA开发的语言程序具有很强的通用性，与其他软件之间输入输出的数据进行交互使用很方便。因此，用Excel VBA开发的教师人事档案系统简单实用，可以帮助学校管理者在人事管理中高效省时地工作。

1 系统功能分析

1.1 教师人事档案系统功能结构

根据学校实际以及设计目标，将教师人事档案系统划分成教师基本情况、教师考核、教师月考勤和教师工资发放四大功能模块（图1）。本系统支持动态的人事管理需求，而且能够很快捷地把新的信息加入系统。

1.2 业务流程图

使用者在进入本系统时，首先打开的是一个用户登录框，需要输入用户名和密码，通过身份验证之后的用户才能进入系统（图2）。设置登录权限的原因主要是：首先，不合法的用户是不允许进入本系统的;其次，一旦进入本系统，使用者所有的操作记录将会被如实记载下来。成功进入系统之后首先呈现的是系统界面（图3），包括教师基本情况表、教师月考勤表、教师考核表、教师工资发放表，用户可以根据自己的需求选择进行使用。

2 功能模块设计

2.1 教师基本情况

教师基本情况包括系部、身份证、学历、职称、院校等，主要完成教师所属系部信息、身份账号信息、学历信息、目前职称信息、所属院校信息的建立、查询、修改和删除等。

2.2 教师考核

教师考核包括教学效果、科研量化、考核结果、考核等级、排名等：教学效果是根据教学效果评价指标计算得来的数值，可以根据实际情况进行修改;科研量化数据信息可以实时进行更新;考核结果是根据教学效果和科研量化两项求和得来的;考核等级数据是根据考核结果进行的等级划分;排名是根据考核结果进行排序得到的名次。

2.3 教师月考勤

教师月考勤是根据每位教师实际情况，记录请假、旷工、加班、实际工作天数，用户可以根据实际情况实时进行修改。月考勤是教师考核以及教师工资发放的基础，与后两者紧密相关。

2.4 教师工资发放

教师的工资发放包括教师基本工资、加班奖、绩效奖励、应发工资、房租、水电费、实发工资等。其中应发工资为基本工资、加班奖和绩效奖励的和，实发工资为应发工资减去房租和水电费。

3 系统功能代码实现

3.1 Excel工作表的建立

Excel表格可以用来存储数据信息，是本系统搭建的基础。根据已经设计好的流程图将需要的数据信息录入Excel表格，建立初步的框架，在此基础上继续进行编辑与实施。Excel VBA可以方便地对数据进行管理与维护，是表格数据处理的有效工具，而且操作简单快捷、易于掌握。

3.2 查询界面代码实现

打开使用Microsoft Office Excel 2010中文版已经建立好的数据表格，将其另存为启用宏的文件;新建界面工作表“教师人事档案系统界面”，设置背景图片、边框、Logo、标题文字信息等。打开开发工具，插入控件四个命令按钮，进行按钮属性设置以及代码实现。

“教师基本情况表”命令按钮的代码实现：

Private Sub CommandButton1_Click（）

Sheets（″教师基本情况表″）.Select

End Sub

“教师考核表”命令按钮的代码实现：

Private Sub CommandButton1_Click（）

Sheets（″教师考核表″）.Select

End Sub

“教师月考勤表”命令按钮的代码实现：

Private Sub CommandButton1_Click（）

Sheets（″教师月考勤表″）.Select

End Sub

“教师工资发放表”命令按钮的代码实现：

Private Sub CommandButton1_Click（）

Sheets（″教师工资发放表″）.Select

End Sub

3.3 登录界面的代码实现

为了更好地控制教师人事档案管理工作，登录权限的设置十分重要。在本系统中拥有使用权限的用户都是拥有账号和密码的，如果输入的账号和密码正确，则可以进入系统进行查询修改，否则是不允许进行这些操作的。首先设置好登录界面，然后打开VBA编辑环境，插入一个用户窗体，设置窗体属性，在窗体中插入控件并设置其属性，最后编写事件代码。

“登录”按钮事件代码实现：

Private Sub btnLogin_Click（）

Dim name As String

Dim pwd As String

name=txtName.Text

pwd=txtPwd.Text

If name=″admin″ And pwd=″123456″ Then

UserForm1.Hide

Exit Sub

Else

MsgBox″用户名或密码不正确，请重新输入″

End If