分享
 
 
 

制作Word内置对话框宏

王朝other·作者佚名  2008-05-21
窄屏简体版  字體: |||超大  

如果需要在Word 2000/2002中反复进行某项工作,就可以利用宏来自动完成这项工作。宏是一系列组合在一起的 Word 命令和指令,它们形成了一个命令,以实现任务执行的自动化,也就是说宏就是一条自定义的命令。

我们可以创建并执行宏,以替代人工进行的一系列费时而单调的重复性 Word 操作,自动完成任务。我们可以用宏录制器和“Visual Basic 编辑器”两种方法来创建一个宏。

对于一般的宏,只要用宏录制器录制即可。而有VB编程基础的用户还可以用“Visual Basic 编辑器”对已录制好的宏进行修改甚至直接用“Visual Basic 编辑器”创建新宏。

本来宏是用来加速日常操作的,单独的操作步骤没有制作宏的必要。但是现在各种各样的计算机考试会有一些特殊的要求,要求学生创建有一定难度的宏。笔者在辅导学生参加劳动部全国计算机及信息高新技术考试中的《办公软件应用》模块(操作员级)时就碰到了这样的问题,题目要求新建一个名为A8-A.DOC的文件,并在其中用对话框来创建一个名为A8B1的宏,使用“Alt+Shift+Z”作为快捷键,显示选定内容的字数。学生在做这道题时,按以往录制宏的方法,新建文件→录入任意文本→选择文本→录制新宏→选择“工具”的“字数统计”命令→关闭对话框→停止录制宏,一路做下来。本以为已经轻松搞定,可是试运行竟然没有反应,调出“Visual Basic 编辑器”查看宏代码,宏的内容是空的。Word的录制宏操作并不能捕获类似只显示一下对话框这样的操作。

有两种方法可以实现本题的要求,下面分别加以说明。

方法一:

1.新建一个文件,在考生文件夹中保存为“A8-A.DOC”,随意录入一些文本并选定;

2.单击“工具”菜单→“宏” →“录制新宏”,弹出“录制宏”对话框,如图1

3.在“宏名”框中输入“A8B1”,从“将宏保存在”的下拉列表框中选择当前文档“A8-A.DOC”,单击“将宏指定到”栏中的“键盘”按钮,弹出“自定义键盘”对话框;

4.从“将修改保存在”的下拉列表中选择当前文档“A8-A.DOC”,在“请按新快捷键”输入框单击,按“Alt+Shift+Z”键,再单击“指定”按钮,单击“关闭”按钮关闭“自定义键盘”对话框,开始录制宏;

5.单击菜单“工具” →“宏” →“宏”,弹出“宏”对话框;

6.从“宏的位置”下拉列表中选择“Word命令”,然后在上方的列表框中选择“ToolsWordCount”,再单击“运行”按钮,弹出“字数统计”对话框,单击“取消”按钮取消该对话框;

7.单击工具栏中的“停止录制”按钮,结束宏的录制;

8.测试宏,无误后保存文件。

方法二:

1.按方法一的第1~4步操作;

2.按方法一的第7步停止录制宏(这两步是为宏指定快捷键);

3.单击“工具”菜单→“宏” →“宏”,在弹出的宏对话框左边宏列表中选择A8B1,再单击“编辑”按钮,打开“Visual Basic 编辑器”,如图2。

4.在“endsub”行之前输入“Dialogs?wdDialogToolsWordCount?.Show”,关闭“Visual Basic 编辑器”窗口;

5.测试宏,并保存文件。

总结:从效果来看,这两种方法都达到了题目要求。但是我们查看方法一的VBA代码,其内容是Application.Run MacroName?=″ToolsWordCount″,含义是运行名为“ToolsWordCount”的VB宏,其实该宏是一个Word命令,我们在录制此宏时已经看到,还可以运行其它任何Word 命令;方法二的“Dialogs?wdDialogToolsWordCount?.Show”一句是使用Dialogs对象集的Show方法来显示“字数统计”这个Word内置对话框。我们还可用此法显示其它任一Word内置对话框。笔者认为两种方法应该都是正确的。

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有