用VBA開發(fā)員工信息表

1、正確學(xué)會Excel VBA的16堂課用VBA開發(fā)員工信息表使用窗體錄入報表數(shù)據(jù)管理員工數(shù)據(jù)報表使用窗體錄入報表數(shù)據(jù)使用窗體錄入報表數(shù)據(jù) 創(chuàng)建用戶窗體 窗體與工作簿的數(shù)據(jù)交換創(chuàng)建用戶窗體創(chuàng)建用戶窗體具體操作步驟如下：步驟1：如圖11-1所示的“員工信息表”工作表中切換到【開發(fā)工具】選項卡，單擊“代碼”選項組中的【Visual Basic】按鈕打開VBA代碼編輯窗口，選擇【插入】【用戶窗體】菜單項插入一個名為“UserForm1”的用戶窗體，在其【屬性】窗口中修改“Caption”的值為“錄入數(shù)據(jù)”，即可將該窗體的標(biāo)題顯示文本修改為“錄入數(shù)據(jù)”，如圖11-2所示。創(chuàng)建用戶窗體創(chuàng)建用戶窗體具體操作步

2、驟如下：步驟2：在【工具箱】窗口中單擊【標(biāo)簽】按鈕 ，在用戶窗體中拖動鼠標(biāo)繪制一個適當(dāng)大小的標(biāo)簽，在其【屬性】窗口的“Caption”文本框中輸入“員工編號”，修改該標(biāo)簽的顯示文本，在“BorderStyle”下拉列表中選擇“1-fmBorderStyleSingle”選項，設(shè)置該標(biāo)簽顯示邊框，如圖11-3所示。步驟3：在【工具箱】窗口中單擊【文字框】按鈕 ，在用戶窗體中繪制一個適當(dāng)大小的文本框，如圖11-4所示。創(chuàng)建用戶窗體創(chuàng)建用戶窗體具體操作步驟如下：步驟4：在用戶窗體中繼續(xù)添加“員工姓名”、“出生年月”和“工作時間”標(biāo)簽以及與其分別相對應(yīng)的文本框，如圖11-5所示。步驟5：在【工具箱】窗

3、口中單擊【框架】按鈕 ，在用戶窗體中繪制一個適當(dāng)大小的框架控件，在其【屬性】窗口的“Caption”文本框中輸入“性別”，修改該框架的顯示文本，如圖11-6所示。創(chuàng)建用戶窗體創(chuàng)建用戶窗體具體操作步驟如下：步驟6：在框架中添加員工性別信息。即在【工具箱】窗口中單擊【選項按鈕】 ，在用戶窗體中繪制一個選項按鈕控件，在該選項按鈕【屬性】窗口的“Caption”文本框中輸入“男”，修改該選項按鈕的顯示文本，如圖11-7所示。步驟7：在該框架中添加一個顯示文本為“女”的選項按鈕，即可完成對“性別”框架及其選項的設(shè)置，如圖11-8所示。在用戶窗體上添加“學(xué)歷”和“員工職位”的框架及相應(yīng)的選項按鈕，如圖11

4、-9所示。創(chuàng)建用戶窗體創(chuàng)建用戶窗體具體操作步驟如下：步驟8：在添加的“員工職位”框架中，為使添加的選項按鈕保持整體和諧性，先選擇“總經(jīng)理”選項按鈕，在按住Ctrl鍵時依次選中其他選項按鈕，在所選選項按鈕上右擊并選擇【統(tǒng)一尺寸】【兩者都相同】菜單項，即可將選中的所有選項按鈕設(shè)置為統(tǒng)一大小。步驟9：在選中的選項按鈕上再次單擊鼠標(biāo)右鍵，在彈出的快捷菜單中選擇【對齊】【對齊到網(wǎng)格】菜單項，即可將所有選中的選項按鈕設(shè)置為統(tǒng)一對齊方式。使用鼠標(biāo)拖動的方法調(diào)整各選項按鈕的位置，即可得到如圖11-10所示的結(jié)果。創(chuàng)建用戶窗體創(chuàng)建用戶窗體具體操作步驟如下：步驟10：在【工具箱】窗口中單擊【命令按鈕】 ，在用戶窗

5、體上繪制一個命令按鈕控件，在該命令按鈕的【屬性】窗口中的“Caption”文本框中輸入“確定”，修改該命令按鈕的顯示文本，如圖11-11所示。步驟11：在該窗體上繼續(xù)添加一個顯示文本為“取消”的命令按鈕，如圖11-12所示。在全部設(shè)置完畢后，可對用戶窗體的整體布局進(jìn)行相應(yīng)調(diào)整，完成窗體的創(chuàng)建過程。管理員工數(shù)據(jù)報表管理員工數(shù)據(jù)報表 生成員工工資條 制作員工卡 打印員工考核表生成員工工資條生成員工工資條具體的操作步驟如下：步驟1：新建員工工資表工作簿，將工作表“Sheet1”重命名為“員工工資表”，在該工作表中輸入員工各項信息，如圖11-21所示。步驟2：在【開發(fā)工具】選項卡中單擊“代碼”選項組中

6、的【Visual Basic】按鈕，即可打開VBA代碼編輯窗口，選擇【插入】【模塊】菜單項插入一個模塊1。步驟3：在該模塊窗口中選擇【插入】【過程】菜單項，即可打開【添加子過程】對話框，在“名稱”文本框中輸入“實(shí)發(fā)工資”，在“類型”組合框中選擇“子程序”單選項，在【范圍】組合框中選擇“公共的”單選項，如圖11-22所示。生成員工工資條生成員工工資條具體的操作步驟如下：步驟4：單擊【確定】按鈕，即可創(chuàng)建名為“實(shí)發(fā)工資”的公有子過程。在其中輸入如下完整的VBA程序代碼，如圖11-23所示。步驟5：返回工作表中，為上述過程代碼設(shè)置執(zhí)行按鈕，在【開發(fā)工具】選項卡中單擊“控件”選項組中的【插入】下拉按鈕

7、，在其下拉列表中單擊【按鈕（窗體控件）】按鈕 ，當(dāng)鼠標(biāo)指針變?yōu)椤?”形狀時，在工作表中的適當(dāng)位置處按住鼠標(biāo)左鍵進(jìn)行拖動，拖動至合適大小后釋放鼠標(biāo)左鍵，即可打開【指定宏】對話框，在“宏名”列表框中選擇“實(shí)發(fā)工資”選項，如圖11-24所示。生成員工工資條生成員工工資條具體的操作步驟如下：步驟6：單擊【確定】按鈕完成宏的指定操作。將按鈕名稱更改為“計算實(shí)發(fā)工資”，單擊工作表中其他任意位置退出該按鈕的編輯狀態(tài)。將鼠標(biāo)指針移到該按鈕上，當(dāng)指針形狀變?yōu)?形狀時單擊【計算實(shí)發(fā)工資】按鈕，即可完成實(shí)發(fā)工資的計算，如圖11-25所示。步驟7：實(shí)發(fā)工資計算完畢后，即可進(jìn)行生成員工工資條的程序設(shè)計。在“實(shí)發(fā)工資”子

8、過程下繼續(xù)添加如下“生成工資條”的VBA代碼。生成員工工資條生成員工工資條具體的操作步驟如下：步驟8：返回工作表為“生成工資條”過程設(shè)置執(zhí)行按鈕。即在【開發(fā)工具】選項卡中，單擊“控件”選項組中的【插入】下拉按鈕，在其下拉列表中單擊【按鈕（窗體控件）】按鈕 ，當(dāng)鼠標(biāo)指針變?yōu)椤?”形狀時，在工作表中的適當(dāng)位置處按住鼠標(biāo)左鍵進(jìn)行拖動，拖動至合適大小后釋放鼠標(biāo)左鍵，即可打開【指定宏】對話框，在“宏名”列表框中選擇“生成工資條”選項，如圖11-26所示。生成員工工資條生成員工工資條具體的操作步驟如下：步驟9：單擊【確定】按鈕，即可完成宏的指定操作。將按鈕名稱更改為“生成工資條”，單擊工作表中其他任意位置

9、退出該按鈕的編輯狀態(tài)，單擊該按鈕，即可運(yùn)行指定的宏代碼，生成工資條，當(dāng)工資條的生成完成后會彈出如圖11-27所示的提示信息。步驟10：無需單擊【確定】按鈕，系統(tǒng)會在3秒鐘后自動關(guān)閉該提示信息，此時可看到運(yùn)行結(jié)果，如圖11-28所示。專家課堂（常見問題與解答）專家課堂（常見問題與解答）點(diǎn)撥點(diǎn)撥1：宏放在WorkSheet和Sheet及模塊中各有什么區(qū)域？解答：解答：放在ThisWorkbook或Sheet中的宏與模塊中的宏的主要區(qū)別是book或Sheet中的過程函數(shù)只能是對象所專有的，不能在對象之外的任何地方調(diào)用，比如不能聲明Public過程，否則編譯報錯，而模塊中聲明Public過程函數(shù)可以在任何地方使用。點(diǎn)撥點(diǎn)撥2：在制作員工