曾 慧
(遼寧工程職業(yè)學(xué)院,鐵嶺 112008)
在高校學(xué)生信息錄入時,面對成百上千條數(shù)據(jù),難免會出現(xiàn)疏忽,造成工作上的失誤。為了解決這個難題,我們可以制作一個錄入系統(tǒng),如圖1所示,面對一個操作界面,可以大大提高錄入的速度和正確率。而這個錄入系統(tǒng),我們可以使用Excel ActiveX控件和VBA編程來實現(xiàn)。
圖1 數(shù)據(jù)錄入系統(tǒng)
錄入系統(tǒng)工作界面如圖1所示。我們可以使用Excel的ActiveX控件來完成。Excel的控件分為兩種,一種是表單控件,另一種就是我們使用的ActiveX控件。由于表單控件只能應(yīng)用在工作表中,而ActiveX控件不僅可以在工作表中使用,還可以在用戶窗體中使用,并且具備了眾多的屬性和事件,所以我們選擇ActiveX控件來完成工作界面的制作。
在sheet1工作表中,制作工作界面。在工作界面中,“姓名”和“總分”后面使用的是“文本框”控件;“性別”后面使用的是“選項按鈕”控件;“系部”后面使用的是“組合框”控件;“選修課程”后使用的是“復(fù)選框”控件;“添加”是一個“命令按鈕”控件。修改各控件的“名稱”屬性與前面的文字或圖中所示文字相同。
我們希望,每次打開工作簿的時候,“系部”與“語種”當(dāng)中是有數(shù)據(jù)可選擇的。因為它是工作簿事件,所以我們雙擊“ThisWorkbook”,對“系部”和“語種”進行初始化。以“系部”中的“電子工程系”為例,我們可以錄入代碼:Sheet1.系部.AddItem.“電子工程系”?!罢Z種”初始化與它類似,不再贅述。
我們在sheet2工作表中制作一個表格,如圖2所示,我們希望,單擊“添加”按鈕時,在工作界面所錄入的數(shù)據(jù)可以自動添到該表中。
圖2 接收數(shù)據(jù)表格
雙擊“添加”按鈕,錄入如圖3所示代碼:
圖3 獲取數(shù)據(jù)代碼
這樣我們就完成了整個錄入系統(tǒng)的制作。我們可以進行一下測試,當(dāng)在操作界面錄入數(shù)據(jù)后,單擊“添加”按鈕,數(shù)據(jù)自動填充在Sheet2的工作表中。通過這種方式,大大簡化了錄入數(shù)據(jù)的煩瑣性。
Excel VBA是一種面向用戶的程序語言,它打破了Excel函數(shù)的局限性,應(yīng)用非常廣泛。我們要不斷地去了解,學(xué)習(xí),直至精通VBA程序開發(fā),它將為我們在數(shù)據(jù)處理領(lǐng)域帶來極大的方便與快捷。
[1] 陳華福.Excel宏在田徑比賽中編排的應(yīng)用[J].體育科技文獻通報,2012(05):98-99.
[2] 解保紅.基于VBA的Excel管理應(yīng)用[J].科技創(chuàng)新與生產(chǎn)力,2010(12):100-101.
[3] 曾洋.EXCELVBA在數(shù)據(jù)表處理中的應(yīng)用[J].重慶電子工程職業(yè)學(xué)院學(xué)報,2010(05):161-162.
[4] 徐安峰.巧用Excel宏快速統(tǒng)計分析學(xué)生成績[J].科技信息,2008(05):58-59.