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-），男，農藝師，長期從事種子質量檢驗工作。