小男孩‘自慰网亚洲一区二区,亚洲一级在线播放毛片,亚洲中文字幕av每天更新,黄aⅴ永久免费无码,91成人午夜在线精品,色网站免费在线观看,亚洲欧洲wwwww在线观看

分享

調(diào)查問卷Excel全搞定Excel-1

 nxhujiee 2010-03-08

調(diào)查問卷Excel全搞定

 

2006-08-15 作者:■安徽 陳秀峰 來源:
  

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

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


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


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

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

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


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


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


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

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

第四步:在左側(cè)“工程資源管理器”窗口中,選中“VBAProject(工程調(diào)查.xls)”選項(xiàng),然后執(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

    本站是提供個人知識管理的網(wǎng)絡(luò)存儲空間,所有內(nèi)容均由用戶發(fā)布,不代表本站觀點(diǎn)。請注意甄別內(nèi)容中的聯(lián)系方式、誘導(dǎo)購買等信息,謹(jǐn)防詐騙。如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請點(diǎn)擊一鍵舉報(bào)。
    轉(zhuǎn)藏 分享 獻(xiàn)花(0

    0條評論

    發(fā)表

    請遵守用戶 評論公約

    類似文章 更多