今年我市组织了全市能力建设演讲比赛,为确保大赛公平、公正,组委会要求评委现场打分、计分组计分后将计分结果打印,交主持人当场宣布选手成绩,电视台还对演讲比赛进行了现场直播。整个计分我们是采用Excel公式来实现,真正实现了演讲评分智能进行。现将实现过程介绍如下:
　　
　　一、设计数据汇总工作表
　　
　　1、输入字段
　　新建一工作簿,将其命名为“演讲评分系统”,将该工作簿的三个工作表分别命名为:“数据汇总”、“打印选手成绩”和“奖项”。激活“数据汇总”表,在A1单元格输入字段“参赛号”,在B1单元格输入“演讲人”,在C1-I1单元格分别输入“评委1”至“评委7”。在J1-M1单元格分别输入字段“最高分”、“最低分”、“最后得分”和“工作单位”。在A2-A16、B2-B16单元格分别输入15名选手的抽签号和姓名。
　　2、插入公式
　　在J2单元格输入公式:=MAX(C2:I2);在K2单元格输入公式:=MIN(C2:I2)。由于在比赛中,选手最后得分是去掉一个最高分,去掉一个最低分,再求平均分,因此,在L2单元格中输入公式:= (SUM(C2:I2)-MAX(C2:I2)-MIN(C2:I2))/5。然后选中J2:L2单元格区域,将公式向下拖动复制到相应单元格。结果如图1所示。
　　3、设置格式
　　由于选手最后得分要求保留2位小数,因此,还需要对L2:L16单元格设置属性。选中单元格区域,执行“格式→单元格格式”命令,打开“单元格格式”对话框,选择“数字”选项卡,在“分类”中选择“数值”,在小数位数下拉菜单中,选择2位数字,按下“确定”按钮。
　　
　　二、设计选手成绩单打印模版
　　
　　1、建立数据关联
　　由于要现场打印演讲者成绩,因此我们还需建立一个成绩打印模版,该打印模版与“数据汇总”表建立关联,只要在汇总表中输入评委打分,选手相关成绩就会在打印模版中自动显示。我们用VLOOKUP函数来实现这一功能。
　　首先,打开“打印选手成绩”工作表,建立图2所示成绩打印单模版。将A2:E2单元格区域设置为打印区域,在A2单元格中直接输入数值“1”,并设置好打印属性。其次就是输入公式。分别在B2、C2、D2、E2单元格输入公式:=VLOOKUP(A2,数据汇总!$A$2:$L$16,2,FALSE);=VLOOKUP(A2,数据汇总!$A$2:$L$16,10,FALSE);=VLOOKUP(A2,数据汇总!$A$2:$L$16,11,FALSE);=VLOOKUP(A2,数据汇总!$A$2:$L$16,12,FALSE)。这样就建立了成绩打印单与数据汇总表间的关联。
　　2、制作微调按钮
　　单击“视图→工具栏→窗体”,打开窗体对话框,点击“微调项”标志按钮,建立如图2所示的微调按钮,右击该按钮,打开“设置控件格式”对话框,在“属性”中取消打印对象,并与A2单元格建立链接,步长值设为1,最大值设为15,最小值设为1,按下[确定]按钮。此时点击微调按钮,调节A2单元格序号值,对应的数据就会在模版中自动生成,这样就可直接打印演讲选手成绩了。
　　
　　三、设计奖项设置表
　　
　　演讲结束后,就可决定选手名次,确定奖项,并及时将所有选手成绩以及奖项打印后,交给主持人当场宣布。这个过程要求既快捷又准确。这就涉及到设置奖项表格。
　　打开“奖项”工作表,建立如图3所示的表格,在A2单元格输入公式:=数据汇总!A2;在C2单元格输入公式:=VLOOKUP(A2,数据汇总!$A$2:$M$16,2,FALSE);在D2单元格输入公式:=VLOOKUP(A2,数据汇总!$A$2:$M$16,12,FALSE);在E2单元格输入公式:=VLOOKUP(A2,数据汇总!$A$2:$M$16,13,FALSE)。然后,用拖动复制的办法,将公式复制到相应单元格区域。这样就建立了“奖项”工作表相关数据和“数据汇总”表的关联。至此,整个演讲评分表就制作完成了。
　　具体评分时,打开“数据汇总”表,输入评委打分后,选手“最高分”、“最低分”以及“最后得分”就会自动生成。然后,打开“打印选手成绩”表,按右边的微调按钮,选择选手号,选手成绩就会生成,直接打印即可。待所有选手演讲完毕,打开“奖项”表,可以看到所有选手的“参赛号”、“演讲姓名”、“最后得分”以及“工作单位”等数据已经生成,我们只需将该表按照演讲得分高低降序排位后,按照演讲方案规定的奖项设置办法,在B2:B16单元格中输入奖项,将表格打印就可以了。