heets("調查表").Select Application.CutCopyMode = False Range("A1").Select MsgBox "您的選擇已經保存,感謝您對我們工作的支持,祝您新春愉快!", vbOKOnly, "謝謝您" End Sub第六步:輸入完成后,關閉“Visual Basic編輯器”窗口。 第七步:切換到“調查表”工作表中,點擊“窗體”工具欄上的“命令”按鈕,然后在工作表中拖拉出一個“命令”按鈕來,此時系統(tǒng)自動彈出“指定宏”對話框(見圖11),選中上面編輯的“保存”宏,確定返回。
第八步:將“命令”按鈕名(如“按鈕75”)修改為“完成”字符。再調整好按鈕的大小,定位在調查表的右上角。 第九步:同時選中49行和50行,右擊鼠標,在隨后彈出的快捷菜單中,選擇“隱藏”選項,將保存居民選擇結果的兩行隱藏起來;同時選中L至O列,也將其隱藏起來。
小提示 將上述行、列隱藏起來的目的,只是為了美化調查表而已,如果不隱藏,對調查表的使用沒有任何影響。
第十步:利用填充色等功能,對調查表進行一番美化。 至此,整個調查表制作完成。 開展調查 到了居民家中后,切換到“調查表”工作表下,指導居民根據各自的實際情況進行選擇,選擇完成后,點擊一下右上角的“完成”按鈕,數據即刻被保存到“數據表”工作表相應的行中,同時彈出見圖12所示的一個對話框,點擊其中的“確定”按鈕進入下一個調查。 數據統(tǒng)計處理 我們利用Excel強大的函數和公式來完成調查數據的統(tǒng)計
處理工作(這項函數和公式,我們完全可以在制作調查表的時候事先制作好)。我們以“年齡”的統(tǒng)計為例,來看看具體的操作過程: 第一步:切換到“數據統(tǒng)計”工作表中,仿照圖13所示的樣式,制作一份空白表格。 第二步:分別選中E2、E3……E7單元格,依次輸入公式:=COUNTIF(數據表!C:C,1)、=COUNTIF(數據表!C:C,2)……=COUNTIF(數據表!C:C,6)。
小提示 由于,我們在調查表中將年齡分為6種類型,分別用數字1、2……6表示。因此,只要用COUNTIF函數分別統(tǒng)計“數據表”C列數值“1、2……6”的個數即可。
第三步:選中F2單元格,輸入公式:=E2/SUM($E$2:$E$7),確認一下。再次選中F2單元格,將鼠標移至該單元格右下角成“細十字線狀”時,按住左鍵向下拖拉至F7單元格,將上述公式復制到其中。再同時選中F2至F7單元格區(qū)域,單擊一下“格式”工具欄上的“百分比樣式”按鈕,將計算結果顯示成百分比樣式(見圖13)。
這種“細十字線狀”,我們通常稱之為“填充柄”狀態(tài)。
第四步:仿照上述操作,完成其他數據的統(tǒng)計函數和公式的輸入工作。
小提示 在進行“有哪些質量問題”調查項的統(tǒng)計時,統(tǒng)計公式應該為“=COUNTIF(數據表!K:K,"TRUE")”形式。這是因為,“復選框”選中時,“鏈接”的單元格顯示為“TRUE”,“復選框”沒有選中時,“鏈接”的單元格顯示為“FALSE”或者空白。
其實,制作調查表,如果用Microsoft Office InfoPath 2003來實現,可能更加方便,只不過其數據統(tǒng)計功能相對麻煩一些而已,感興趣的讀者不妨一試。
|