讀古今文學網 > 別怕,ExcelVBA其實很簡單 > 6.6 典型的技巧或示例 >

6.6 典型的技巧或示例

6.6.1 設計一張調查問卷

Excel Home免費培訓中心第一期培訓結束了,希望通過調查問卷瞭解學員對培訓的評價和建議,因此,需要設計一張調查問卷,如圖6-61所示。

圖6-61 用Excel設計的調查問卷

問卷的內容包括學員基本資料、單項選擇、多項選擇和學員建議4部分。

設計學員基本資料部分

設計學員基本資料部分的操作如圖6-62所示。

圖6-62 設置學員基本資料

設計單項選擇部分

設計單項選擇部分的操作如圖6-63所示。

圖6-63 設計單項選擇部分

設計多項選擇部分

設計多項選擇部分的操作如圖6-64所示。

圖6-64 設計多項選擇部分

設計其他部分

其他部分的設計如圖6-65所示。

圖6-65 其他部分的設計

裝飾問卷界面

Step 1:設置適合的背景或邊框線、字體及其顏色,如圖6-66所示。

圖6-66 修飾界面

Step 2:取消顯示網格線,如圖6-67所示。

圖6-67 取消顯示網格線

Step 3:隱藏多餘的行和列區域。

自動登記調查結果

為方便統計分析,學員填寫完問卷後,要將結果保存到工作簿中的「調查結果」工作表裡,如圖6-68所示,可以編寫一個程序來實現這個目的。

圖6-68 保存結果的工作表

Step 1:插入一個標準模塊,在模塊中輸入程序。

Step 2:在「問卷」工作表中添加一個按鈕,更改標籤為「提交問卷」,如圖6-69所示,將編寫的程序指定給按鈕。

圖6-69 添加按鈕

Step 3:填寫並保存問卷結果,如圖6-70所示。

圖6-70 使用問卷

保護問卷工作表

如果你擔心設計好的表格會被別人修改,可以鎖定該工作表。

Step 1:鎖定單元格,如圖6-71所示。

圖6-71 鎖定單元格

取消鎖定要輸入數據的單元格,如圖6-72所示。

圖6-72 取消鎖定單元格

Step 2:保護工作表,如圖6-73所示。

圖6-73 保護工作表

6.6.2 職工信息管理界面

阿強是單位人事部的工作員,負責管理所有職工的檔案,如圖6-74所示。

圖6-74 職工信息表

帶著這個念頭,阿強決定動手設計一個職工信息管理界面。

設計界面內容,添加ActiveX控件

添加ActiveX控件,如圖6-75所示。

圖6-75 添加ActiveX控件

美化界面

你可以根據需要隨意對工作表進行裝飾,如設置單元格的邊框、底紋、字體、將多餘的行和列隱藏,鎖定不需要修改的單元格,設置工作表背景等,如圖7-76所示。

圖6-76 美化後的界面及各個控件的功能

給控件添加代碼

管理界面中每個按鈕要達到的目的都可以通過編寫不同的事件過程來實現。

因為所有的控件都繪製在工作表中,因此所有的事件過程都必須保存在控件所在的工作表對像裡。

右鍵單擊工作表標籤,執行【查看代碼】菜單命令,在【代碼窗口】中輸入代碼:

完成後返回工作表區域,退出設計模式,就可以使用設計的界面了。