Excel制作调查问卷

Excel制作调查问卷

ID:43428568

大小:308.39 KB

页数:7页

时间:2019-10-03

Excel制作调查问卷_第1页
Excel制作调查问卷_第2页
Excel制作调查问卷_第3页
Excel制作调查问卷_第4页
Excel制作调查问卷_第5页
资源描述:

《Excel制作调查问卷》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、-+Excel制作调查问卷一、准备工作打开一个excel工作表,准备三个空表,将空表依次命名为:调查表、数据表、数据统计。单击右上角的微软office标志,然后点击excel选项(如上图1所示),弹出对话框。先选择左边菜单栏中的第一项“常用”选项,勾选“在功能区显示‘开发工具’选项卡。如上图2。接下来再选择“常用”选项下的“信任中心设置”选项,点击对话框中的“信任中心设置”,在“宏设置”选项内选择“启用所有宏”,当以上两项设置完后单击“确定”。可以看到在表格最上方的菜单栏中出现了“开发工具”选项。如下图。在“插入”选项里有你所需要的制作问卷选项的所有控

2、件。最后将文字版的问卷内容放在调查表表格内,分别在问卷的下方和数据表(仿照下图)制作一张空白表格保存数据。-+提示:若是多选题有几个选项就要留几个空格,如下图中的“获得哪些信息”。一、制作问卷(以网络市场调查问卷为例)1、单选题制作单选题选项的控件可以用表单控件下的选项按钮、列表框和组合框。提示:如果不知道是那些的话可以将鼠标放在每个控件上等一会,系统会自动给出名称。1)选项按钮(以性别为例)第一步:从点击表单控件中的“选项按钮”,在性别问题下拖拽出一个选项按钮。第二步:将光标放在其中一个按钮上,单击鼠标右键,在下拉菜单中选择“编辑文字”对选项按钮进行

3、命名。-+第三步:单击鼠标右键,在下拉菜单中选择“设置控件格式”,弹出“设置控件格式”窗口(如上图),在单元格链接选择:调查表!$A$91。单击确定。第四步:重复以上操作,添加多个按钮。单元格链接同样选择A91。第五步:调整选项按钮位置。提示:最好利用键盘方向键来调整,只要用鼠标点击选项按钮即可(对复选框同样适用)。1)列表框(以职业为例)第一步:在某一个区域中输入各个职业名称。比如L4至L11单元格第二步:点击“插入”下的列表框选项,在相应问题下拖拽出一个列表框,将鼠标放在列表框上单击鼠标右键弹出“设置控件格式”窗口。(如上图)数据源区域中选择在第一

4、步中输入职业名称的单元格区域。在单元格链接中选中在准备工作时制作的空表中“职业”下对应的单元格,之后的单元格链接都这样做。如下图:2)组合框组合框的做法和列表框类似,在此省略介绍。1、多选题1)不定项选择题从窗体控件中选择复选框,在相应题目下拖拽出相应的复选框,用制作“选项按钮”的方式编辑文字和选择单元格链接。注意:复选框的单元格链接是每个复选框都有一个对应的单元格,与选项按钮等制作单选题选项的控件不同。2)限制选项多选题。-+对于限制选项的多选题我们可以用两个或三个组合框去实现。如上图1、关于时间等选项的设置对于问卷调查中年龄或参加工作多少年等时间性

5、的问题我们可以用填空、滚动条和数值调节钮来实现。1)填空(设置单元格内最大值和最小值)选定一个单元格,单击最上方菜单栏的“数据—数据有效性”,弹出数据有效性窗口,在有效性条件:“允许”一栏的下拉列表框里选择整数,就会出现最大值和最小值,在这两项的空白处填写你想设置的最大值和最小值。如上图。注意:为了以后统计数据方便,最好不要用这种方式。2)滚动条-+在窗体控件中选择滚动条控件,将其拖拽到相应问题边上,单击右键设置控件格式,依次输入最大值和最小值,单元格链接一定要选择在准备工作时制作位于调查表最底下“年龄”下的对应单元格。如果想在问题旁边看到结果,可以用

6、单元格相等的方式:L1=A13。1)数据调节钮和滚动条的方式一模一样,在此省略。一、数据保存第一步:将表格切换到“数据表”,在准备工作时我们已经按照上图制作了一个空表。在参加调查人数对应的单元格中输入公式:=COUNTA(A:A,)-3用于统计调查人数。第二步:选择开发工具菜单下的“查看代码”或是用“Alt+F11”组合键进入“VisualBasic编辑器”窗口。选中调查表,单击鼠标右键在下拉菜单中选择“插入—模块”后,弹出空白对话框。在空白对话框中输入以下代码:PublicSub自动记录调查数据()DimTempAsInteger'DimcountA

7、sInteger'Temp=Sheets("数据表").[A1].CurrentRegion.Rows.countcount=Temp-3'Sheets("调查表").SelectRange("A91:R91").Select'(注:这一部分要按自己的实际情况进行修改,他表示在调查表下的用于统计数据的空表范围在A91:R91,如下图)Selection.Copy'Sheets("数据表").Activate'Rows(Temp+1).SelectActiveSheet.PasteCells(Temp+1,13).Value=count+1'Sheets

8、("调查表").SelectApplication.CutCopyMode=False'Msg

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。