![Word Excel PPT PS 移动办公5合1(全5册)](https://wfqqreader-1252317822.image.myqcloud.com/cover/651/31486651/b_31486651.jpg)
5.3 制作“问卷调查表”
在企业开发新产品或推出新服务时,为了使产品服务更好地适应市场的需求,通常需要事先对市场需求进行调查。本例将使用Word制作一份问卷调查表,并利用Word中的Visual Basic脚本添加一些交互功能,使调查表更加人性化,让被调查者可以更快速、方便地填写问卷信息。
5.3.1 在文档中应用ActiveX控件
ActiveX控件是软件中应用的组件和对象,如按钮、文本框、组合框、复选框等。在Word中插入ActiveX控件不仅可以丰富文档内容,还可以针对ActiveX控件进行程序开发,使Word具有更复杂的功能。
1.将文件另存为启用宏的Word文档
在问卷调查表中,需要使用ActiveX控件,并需要应用宏命令实现部分控件的特殊功能,所以需要将素材文件中的Word文档另存为“启动宏的Word文档”格式(.dotm)。操作方法如下。
步骤1 打开“商业问卷调查表.docx”素材文件,单击“文件”选项卡,在文件选项卡中选择“另存为”→“浏览”命令。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-873.jpg?sign=1739479305-VfD1Te51F4Kqhr0cxDX0vbey2RrTxHxk-0-9ca3e421714b1c6b13ef310e4464d815)
步骤2 弹出“另存为”对话框,设置保存类型为“启用宏的Word文档”,然后单击“保存”按钮。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-875.jpg?sign=1739479305-WfVWw9PykW438wHZB6AHRcj3SEx2JPgk-0-b3096f18f084e2e1c26ecc48e9d1ef28)
2.添加“开发工具”选项卡
在文档中添加控件需要使用“开发工具”选项卡中的功能,而“开发工具”选项卡并没有默认显示在菜单栏,需要用户手动添加,添加“开发工具”选项卡的操作方法如下。
步骤1 在“文件”页面中选择左下角的“选项”命令。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-876.jpg?sign=1739479305-GECR2JF1zI7Y8p2gd2Qo1peyK7ABgWLZ-0-9e5f69e3162760cabc2ba7d312952dce)
步骤2 ❶弹出“Word选项”对话框,切换到“自定义功能区”选项卡;❷在右侧的“自定义功能区”列表框中勾选“开发工具”复选框;❸单击“确定”按钮。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-880.jpg?sign=1739479305-pD0XaHZCOwwtpXzmE0FUJFM1d3KG1hea-0-039cfa5d5aded7c96f54bd551734fe94)
3.插入文本框控件
在调查表中,需要用户输入文字内容的地方可以应用文本控件,并根据需要对文本控件的属性进行设置,方法如下。
步骤1 ❶将光标定位到“姓名”右侧的单元格中;❷在“开发工具”选项卡的“控件”组中单击“旧式工具”下拉按钮,❸在弹出的下拉列表中选择“ActiveX控件”组中的“文本框”选项
。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-887.jpg?sign=1739479305-PiitNjymWSEiMcszgsDmfEljJDx0tz0q-0-28073f3743d29b63ddaec5f1057e37ef)
步骤2 插入文本框控件后,通过文本框四周的控制点调整文本框的大小。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-888.jpg?sign=1739479305-sNDvK04SnUXTHSMc7cF84UvTuXT2O4ZF-0-17c9853891927d63c905aa5a9ee9f290)
步骤3 使用相同的方法,为其他需要填写内容的单元格添加文本框。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-889.jpg?sign=1739479305-rBLLqkyanIDhn03mwvo3CnWuaZ9oRqAy-0-5e7c494d0de80adad0463790c8133480)
提示
在使用控件的过程中,如果“开发工具”选项卡“控件”组中的“设计模式”按钮为按下状态,则为控件编辑模式;若“设计模式”按钮弹起,则为控件使用模式。
4.插入选项按钮控件
如果要求他人在填写调查表时进行选择,而不是填写,并且只能选项一项信息时,可以使用选项按钮控件,具体操作方法如下。
步骤1 ❶将光标定位到“性别”右侧的单元格中;❷在“开发工具”选项卡的“控件”组中单击“旧式工具”下拉按钮,❸在弹出的下拉列表中单击“ActiveX控件”组中的“选项按钮”选项
。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-895.jpg?sign=1739479305-ipYyvYa3uTnjMGanv7gkxMJOyjYZF1kY-0-cfa79e4b9f6b8c6c6e3bfae5e16cc28a)
步骤2 添加的选项按钮为选中状态,在“开发工具”选项卡的“控件”组中单击“属性”按钮。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-897.jpg?sign=1739479305-tLtycmYFJyfs1Yv0URkshQtkhlE7eZ1k-0-6013f7e87f3043acb38114c667645721)
步骤3 弹出“属性”对话框,将“Caption”项更改为“男”;将“GroupName”项更改为“Sex”,完成后关闭“属性”对话框。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-898.jpg?sign=1739479305-TgynTqPAM67TWNypFKD97L3RtGNCQyVp-0-c81f4b685367940814f15ba8bfb7f6e3)
步骤4 返回文档,通过控件四周的控制句柄调整选项按钮控件的大小。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-899.jpg?sign=1739479305-mvNcthRQ05dYcsbDZWYGdPe1xso3z64l-0-cf697c86a3342df696a4099dfd476ef3)
步骤5 使用相同的方法,在“性别”单元格中再次添加一个选项按钮控件,并打开“属性”对话框,将“Caption”更改为“女”,“GroupName”更改为“Sex”,并调整好控件大小。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-900.jpg?sign=1739479305-NQsrnRcdDLPdheJe5KUve6ERk4tU7EqO-0-cccba6ac8082b412830535c6123598eb)
提示
GroupName属性用于设置多个选项按钮所在的不同组别,同一级别中只能选中其中一个选项。因此在同一选项组中需要使用相同的GroupName属性,而不同的选项组则需要分别设置不同的GroupName属性。
步骤6 使用相同的方法为其他需要设置单选项的单元格添加选项按钮控件。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-901.jpg?sign=1739479305-4sGysOoo3crqpdCbZVDwtTyFjdlVQKI7-0-d77c8e4219cb4171a7679564c07fe644)
5.插入复选框控件
如果允许用户在对信息进行选择时可以选择多项信息,可以使用复选框控件,具体操作方法如下。
步骤1 ❶将光标定位到“您喝茶的原因是?(可多选)”右侧的单元格中;❷单击“开发工具”选项卡“控件”组中的“旧式工具”下拉按钮;❸在弹出的下拉列表中选择“复选框”控件
。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-908.jpg?sign=1739479305-P8fm3UY7PP64YkHJFeBC2hUF9Hs51RG4-0-4b554a4f17302d4bfe01c495cecaab83)
步骤2 复选框控件被插入到单元格中,单击“开发工具”选项卡“控件”组中的“属性”按钮。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-909.jpg?sign=1739479305-Ky0NHiO0rcDM2QixvVxXL27YXTqIGoNo-0-3ae16b1c077a93e5eeb702c30333f6b8)
步骤3 在“属性”对话框中设置“Caption”为“A 有益健康”,设置“GroupName”为“hc”。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-910.jpg?sign=1739479305-sUARdmluPkgfnxlT9iLu2u2eWN6i07GH-0-9e43e8ef6a4e58da3f5668be31875840)
步骤3 使用相同的方法分别添加其他复选框控件,注意保持各组中的GroupName项相同。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-911.jpg?sign=1739479305-dDu3EM94M8l8Z40iHrRCtc0I9Wu933Lw-0-64fab79a9f4f7e75b7ae854c405160d3)
6.插入命令按钮插件
如果允许用户可以快速执行一些指定的操作,可以在Word文档中插入命令按钮控件,并通过编写按钮事件过程代码实现其功能,具体操作方法如下。
步骤1 ❶将光标定位到表格下方需要添加“提交”按钮的位置;❷在“开发工具”选项卡的“控件”组中单击“旧式工具”下拉按钮;❸在弹出的下拉列表中选择“命令按钮”控件
。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-917.jpg?sign=1739479305-1R6hzcqanY6Fq4igQRazmASGe0wadj62-0-3ecb4add7e8d017b87a8fb5073b99026)
步骤2 保持命令按钮为选中状态,选择“开发工具”选项卡“控件”组中的“属性”命令。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-919.jpg?sign=1739479305-I9915wYlIKWIcg3E2dXkL16DYipBD9wx-0-fe35e7cd8fda667adda488e2d78bdca0)
步骤3 ❶弹出“属性”对话框,设置“Caption”为“提交调查表”;❷选中“Font”项,单击右侧的“…”按钮。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-922.jpg?sign=1739479305-lIPWA3o8fi6qiqZWuJd7riG19Hwqrjax-0-e12e4c2455a7eaaa6fc4f7f1dbd749ac)
步骤4 弹出“字体”对话框,设置字体为“华文细黑”,字号为“小四”,完成后单击“确定”按钮。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-923.jpg?sign=1739479305-Z42xEhkb7hp6BD5oZOhnjmjjemLn8kn8-0-e0b13082923525a7280781552e1b3a76)
步骤5 返回文档中,通过按钮四周的控制句柄调整按钮大小。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-924.jpg?sign=1739479305-JDY1oScm4qzCV3UIO5vPzDyE0RcCPL1r-0-f253a2e5aded8dc50cf284026f489ea5)
5.3.2 添加宏代码
在用户填写完调查表后,为了获取用户提交的问卷信息,可以在“提交调查表”按钮上添加程序,使用户单击该按钮后自动保存文件并发送邮件到指定邮箱,具体操作方法如下。
步骤1 双击文档中的“提交调查表”按钮,打开“宏代码”窗口。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-925.jpg?sign=1739479305-VFg7CU49pVqmzUgs8kU6wzdsK5to675a-0-1c3533151069b6594d6c7296fa2e9520)
步骤2 在代码窗口中输入如下代码,表示保存调查结果。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-926.jpg?sign=1739479305-nJJhpA78Bx6UqNhiJL5CTNXeMHeLvZXH-0-39e86efed99531b4a922aa09842132a1)
步骤3 在宏代码窗口中选择“文件”→“导出文件”命令。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-927.jpg?sign=1739479305-YgoRzEdQSS3yMYfD5SbhdNMmMiZWMlNx-0-0800187fa7c26536d629c1fe7991b0d2)
步骤4 ❶弹出“导出文件”对话框,使用默认保存位置,将其命名为“问卷调查信息反馈”;❷单击“保存”按钮。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-931.jpg?sign=1739479305-GvldnTs9U8GUYlnxJhUp6fu3gBCmWmPN-0-24a98bd60ebc0e50d6a57d0c83d36ff2)
步骤5 接下来为控件添加发送代码,并设置接收调查结果的邮件地址,代码如下。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-932.jpg?sign=1739479305-6Om9bjWr8v44qj7ahUu36Qe8sdFUkMPf-0-e3e004ad76521c4dea3d5dbf4ec02c89)
提示
代码中的邮箱地址根据需要自行更改。
步骤6 代码编写完成后,选择“文件”→“保存 商业问卷调查表”命令,再选择“关闭并返回到Microsoft Word”命令,返回文档后,保存文档即可。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-933.jpg?sign=1739479305-ze3k6mKrCRY8MFhuJrt1YJgr59lPnSUG-0-79ec327737157e674db73d3061c10d53)
5.3.3 文件保护与测试
为了保证调查表不被用户误修改,需要进行保护调查表的操作,使用户只能修改调查表中的控件值。同时,为了查看调查表的效果,还需要对整个调查表程序功能进行测试。
1.保护调查表文档
使用保护文档中的仅允许填写窗体功能,可以使用户只能在控件上进行填写,而不能对文档内容进行其他任务操作,具体操作方法如下。
步骤1 ❶单击“开发工具”选项卡“控件”组中的“设计模式”按钮退出设计模式;❷单击“开发工具”选项卡“保护”组中的“限制编辑”命令。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-936.jpg?sign=1739479305-SMQc5fX8CioC1MDtHj9cixd1VpdVEv2F-0-f779c83fcac76b77eb0282b49abb812a)
步骤2 ❶打开“限制编辑”窗格,勾选仅“允许在文档中进行此类型的编辑:”复选框;❷在下方的下拉列表中选择“填写窗体”选项;❸单击“是,启动强制保护”按钮。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-941.jpg?sign=1739479305-7HjNM9QkAiNw1TD8kuAOK9ibQyhQztRW-0-1d803f3e64cb0b932d12a279c7a70d79)
步骤3 ❶弹出“启动强制保护”对话框,在文本框中输入新密码并确认新密码;❷单击“确定”按钮即可。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-944.jpg?sign=1739479305-G8VD8YyFgKD6btJoN02poWgUwTYq6Px2-0-66c3d2946ca976b584319d3ec414c72f)
2.表格测试
调查表制作完成后,可以通过填写调查表并提交结果来进行测试,操作方法如下。
步骤1 打开调查文件,确保“设计模式”按钮为弹起状态,选择各个单元格中的单元项,查看是否只能在同一选项组中进行单选;勾选各个单元格中的复选框,查看是否可以多选;表格填写完成后,单击“提交调查表”按钮。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-945.jpg?sign=1739479305-rBnyLTjvozXvPudk8AX1w2lJKdZ8YVMf-0-ee7633bc2583c91234787267a150142b)
步骤2 弹出Outlook程序界面,如果还没有登录Outlook账户,程序会提示用户登录,单击“下一步”按钮继续即可。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-946.jpg?sign=1739479305-iNtsEygMXD2xRXMjeWAgDghJf564myq8-0-18bd4f32cd477b0625495c4a22bf7243)
步骤3 如果已经登录Outlook账户,则会直接进入邮件编写页面,并自动填写好收件人地址、主题和附件内容,单击“发送”按钮即可直接发送邮件。
![](https://epubservercos.yuewen.com/7D5670/17042066804483006/epubprivate/OEBPS/Images/1-947.jpg?sign=1739479305-RoBBMyRk0T5PTh46IKRmi2103Q3lSg60-0-0511d63863a62ab303e2b823ce0e8179)