每年春節(jié)前后，建筑工程施工現(xiàn)場相對比較清閑，我們這些從事建設(shè)工程質(zhì)量監(jiān)督的人員，就抽空到居民家中，開展一年一度的全市住房狀況調(diào)查工作。以前，我們都是先向居民發(fā)放紙質(zhì)調(diào)查表，由居民填寫后，再回收統(tǒng)計。這樣做，既麻煩又不準確。今年，我們改用Excel制作的電子調(diào)查表，帶上筆記本電腦上門調(diào)查。這樣做，既方便了數(shù)據(jù)的統(tǒng)計處理，又給居民一種新鮮感，進一步激發(fā)了他們的參與熱情。
制作調(diào)查問卷的思路
在Excel中，我們先利用“窗體”工具欄上的“分組框、選項按鈕、復選框、組合框、按鈕”等控件，制作成如圖1所示的調(diào)查表，并將每一位參與調(diào)查居民的選擇結(jié)果保存在表格下方對應(yīng)的單元格中。然后通過“宏按鈕”將選擇結(jié)果依次復制到“數(shù)據(jù)表”工作表中保存起來。最后，利用函數(shù)和公式對數(shù)據(jù)進行統(tǒng)計處理，并將統(tǒng)計結(jié)果保存在“數(shù)據(jù)統(tǒng)計”工作表中，隨時查看調(diào)查的統(tǒng)計結(jié)果。

實戰(zhàn)制作調(diào)查表
在用Excel制作調(diào)查問卷前要進行一些準備工作，以方便后面的制作過程:
第一步:啟動Excel2003(其他版本操作相似)，新建一工作簿文檔，取名保存(如“工程調(diào)查.xls”)。
第二步:依次雙擊工作表標簽(sheet1、sheet2、sheet3)，使其成反白狀態(tài)，再輸入字符，將其重命名為“調(diào)查表、數(shù)據(jù)表、數(shù)據(jù)統(tǒng)計”(見圖2)。

第三步:將A1至L1單元格合并后，輸入調(diào)查表標題(如“某某市住房狀況調(diào)查表”)；將A2至L2單元格合并后，輸入調(diào)查說明；并設(shè)置好字體、字號等。
第四步:執(zhí)行“視圖→工具欄→窗體”命令，展開“窗體”工具欄(見圖2)。
好了，現(xiàn)在我們可以添加用于調(diào)查的各種控件了。
1.選項按鈕的添加:所謂“選項按鈕”，就是我們通常所說的“單選”按鈕。我們以“年齡”調(diào)查項為例，來看看具體的添加過程:
第一步:點擊“窗體”工具欄上的“分組框”按鈕，然后在工作表中拖拉出一個分組框，并將分組框名(如“分組框2”)修改為“年齡”(見圖3)。

第二步:點擊“窗體”工具欄上的“選項按鈕”按鈕，然后在上述“年齡”分組框中拖拉出一個按鈕來，并將按鈕名(如“選項按鈕4”)修改為相應(yīng)的調(diào)查項字符(如“20歲以下”，見圖3)
第三步:重復上述操作，再添加若干“選項按鈕”。小提示
選中第1個“選項按鈕”，在按住Ctrl鍵的同時，拖動一下鼠標，復制一個選項按鈕，修改一下其中的字符即可快速制作出另一個“選項按鈕”來。第四步:雙擊其中任意一個“選項按鈕”，打開“設(shè)置控件格式”對話框(見圖4)，

切換到“控制”標簽下，在“單元格鏈接”右側(cè)的方框中輸入“$C$50”，確定返回。小提示
此步操作的目的是將“年齡”調(diào)查項的選擇結(jié)果保存在C50單元格中(選擇第1個、第2個……“選項按鈕”，該單元格分別顯示出1、2……)。第五步:調(diào)整好“分組框”、“選項按鈕”的大小和位置。
2.復選框的添加:所謂“復選框”，就是允許一次性選擇多個選項。我們以“存在哪些質(zhì)量問題”調(diào)查項為例，來看看具體的添加過程:
第一步:制作一個“存在哪些質(zhì)量問題”分組框。
第二步:點擊“窗體”工具欄上的“復選框”按鈕，然后在上述“分組框”中拖拉出一個“復選框”來，并將“復選框”名(如“復選框74”)修改為相應(yīng)的調(diào)查項字符(如“屋面滲水”，見圖5)。

第三步:雙擊剛才添加的第1個“復選框”按鈕，打開“設(shè)置控件格式”對話框(見圖4)，切換到“控制”標簽下，在“單元格鏈接”右側(cè)的方框中輸入“$K$50”，確定返回。第四步:重復上述2、3兩步操作，根據(jù)調(diào)查內(nèi)容，添加其他復選框。小提示
由于是“復選框”，所以每一個“復選框”的“單元格鏈接”地址是不同的，需要逐一設(shè)置。第五步:調(diào)整好“分組框”、“復選框”的大小和位置。

3.組合框的添加:所謂“組合框”，就是我們通常所說的“下拉框”。我們以“學歷”調(diào)查項為例，來看看具體的添加過程:
第一步:在L4至L11單元格區(qū)域(不一定非得是這個區(qū)域喲)中，輸入各學歷分類(見圖6)。
第二步:制作一個“學歷”分組框。小提示
其實，這里只有一個“組合框”，完全不需要添加一個“分組框”。我們之所以添加一個分組框，是為了保持調(diào)查表格式的統(tǒng)一。第三步:點擊“窗體”工具欄上的“組合框”按鈕，然后在上述“分組框”中拖拉出一個“組合框”來。

第四步:雙擊上述“組合框”，打開“對象格式”對話框(見圖7)，在“數(shù)據(jù)源區(qū)域”右側(cè)的方框中輸入“$L$4:$L$11”，在“單元格鏈接”右側(cè)的方框中輸入“$D$50”，確定返回。
第五步:調(diào)整好“分組框”、“組合框”的大小和位置(見圖8)。

仿照上面的操作，完成其他調(diào)查項的制作過程。
保存調(diào)查數(shù)據(jù)
我們通過一個宏，將居民選擇的結(jié)果(顯示在“調(diào)查表”工作表第50行相應(yīng)的單元格中)依次復制保存到“數(shù)據(jù)表”工作表中，并通過一個按鈕來運行該宏。
第一步:切換到“數(shù)據(jù)表”工作表下，仿照圖9的樣式制作一張用來保存數(shù)據(jù)的空白表格。

第二步:在D1單元格中輸入公式:=COUNTA(A:A)-2，用于統(tǒng)計參加調(diào)查的人數(shù)。
第三步:按“Alt+F11”組合鍵，進入“Visual Basic編輯器”窗口(見圖10)。

第四步:在左側(cè)“工程資源管理器”窗口中，選中“VBAProject(工程調(diào)查.xls)”選項，然后執(zhí)行“插入→模塊”命令，插入一個新模塊。
第五步:將下述代碼輸入到右側(cè)編輯區(qū)域中(見圖10):
Sub 保存()
Dim rs As Integer
Sheets("調(diào)查表").Select
Rows(50).Select
Selection.Copy
Sheets("數(shù)據(jù)表").Select
rs = Cells(1, 4)
Rows(rs + 3).Select
ActiveSheet.Paste