EXCEL工作表在种子净度分析中的应用

陆建生

（无为县农技推广中心，安徽芜湖238300）

EXCEL工作表在种子净度分析中的应用

陆建生

（无为县农技推广中心，安徽芜湖238300）

种子净度分析涉及大量的数据处理工作，而EXCEL工作表有强大的数据处理功能，通过EXCELVBA编程可实现对数据的自动化处理，具有快速、准确、直观的优点，可应用于种子检验的教学、科研和种子管理。

种子净度分析；数据处理；EXCELVBA编程

种子净度分析是种子检验的重要环节，分析过程中涉及多次样品称重、容许误差判断、结果校正与修约以及结果报告等方面，数据处理量大。如果采用手工处理，会占用大量时间，而且易错，特别是在样品数量较多时。而EXCEL工作表在数据分析处理方面有独到的优势，EXCEL宏是一种可以完成重复工作的Sub程序。笔者利用EXCEL宏，通过EXCELVBA编程来对检验数据进行处理，具有快速、准确、直观的优点，为种子检验工作带来极大的便利。

1 电子表格设计

根据种子净度分析特点，设计电子表格，如图1所示。

图1 种子净度分析结果报告

2 VBA程序设计

打开EXCEL2007工作表，先点击“office”按钮，再点击“excel选项”按钮，在左边“常用命令”下拉列表中选择“开发工具选项卡”，选择“宏安全性”将其添加到快速访问工具栏中。回到EXCEL2007工作表界面，点击“开发工具”菜单，会发现多了个“宏安全性”按钮，点开，点击“宏设置”，点击“启用所有宏”，确定后完成启用宏设置。

点击“Visual basic”按钮，打开程序编辑窗口，在工程资源管理器中双击对象“Sheet1”,在右边编辑区录入以下代码：

3 程序运行与解析

将试验数据填入净度分析结果报告各对应的单元格内，点击“Visual basic”按钮，打开程序编辑窗口，在工程资源管理器中双击对象“Sheet1”，在窗口右边代码编辑窗口便出现刚才录入的代码，在代码中插入光标，在工具栏点击“运行”按钮，程序开始运行。首先判断是否有重型混杂物，如果有，则计算送验样品中重型混杂物、重型无生命杂质、重型其他作物种子的百分率，保留2位有效数字；如果没有，则计算两个半式样的分析重、重量增失率，并判断是否超差，如果超差，则弹出提示窗口：“试验超差，请重新试验”，程序结束运行；如没有超差，则计算两个半式样的净种子、其他作物种子及杂质百分率，并保留2位有效数字，接着计算两个半式样之间各成分百分率差值，程序运行到140语句，会弹出输入框，要求输入各成分容许误差，查表输入容许误差后，在第150语句，判断3种成分百分率差值是否超差，如果没有，判断为“正确”，程序继续运行；如果超差，则判断为“错误”，并弹出提示窗口：“试验超差，请重新试验”，点击“确定”按钮后，程序结束运行。165语句为在不超差情况下计算3种成分的平均重量百分率，170语句判断是否有重型混杂物。如果没有，在175语句对数据修约后再转入200语句做出结果报告；如果有，则在190语句对3种成分进行结果校正，并保留1位有效数字，200语句是将3种成分之和修约为100%，210语句为结果报告，到此程序运行结束，最后结果如图1所示。如需分析下一份样品，只要按左键选中表格中的数字区域，再按右键点击“清除内容”，然后录入新的数据进行分析。分析完成后，可很方便地对报告进行保存、打印和邮件发送。

经多次试验，使用该方法处理种子净度试验数据，均能快速、准确地显示结果，与使用Excel函数相比，操作更简单、表现更直观，而且ExcelVBA语言简单易学、应用广泛。通过研究笔者发现，不仅种子净度分析可以使用ExcelVBA程序进行数据自动化处理，也适用于种子发芽试验、种子水分测定及种子重量测定，可大大减轻检验人员工作量，提升种子检验工作自动化和信息化水平。

1005-2690（2017）08-0111-03

S339.3+1

B

2017-06-12）

陆建生（1971-），男，农艺师，长期从事种子质量检验工作。