余姚瑞华空调:Word宏应用实例 -- Office学院
来源:百度文库 编辑:偶看新闻 时间:2024/05/08 02:27:34
一、宏的录制
在这里举一实例。例如,在Word 97中,要插入字符,则往往要到符号框中查找半天。对于一些常用的符号,如“¥”,便可以使用宏来使工作简化。
1.单击“工具”选单中“宏”子选单,再单击“录制新宏”选项。
2.给宏取名为“Yuan”,再单击“键盘”。
3.在弹出的对话框中指定快捷键,可指定为“Ctrl+Y”,再关闭该对话框回到“录制宏”对话框。单击“确定”按钮启动记录器。
4.运行“插入”选单中的“符号”子选单,从弹出的“符号”框中选择“¥”,插入后再关闭。另外,也可以指定到工具栏,从弹出的“自定义”对话框中的“命令”栏中把“Normal.NewMacro1.Yuan”拖放到工具栏中。
5.单击“停止录制”工具栏中的“停止录制”按钮。
6.单击“工具”选单中“宏”子选单,再单击“宏”命令。
7.选择第二步中的宏名称,再单击“编辑”按钮。
这时我们可以从中看到以下代码:
Sub Yuan()
Selection.InsertSymbol Font:=″楷体—GB2312″,CharacterNumber:=-27,Unicode:=True
End Sub
以后,当你需要插入字符“¥”时,只需按下快捷键“Ctrl+Y”,或者是在工具栏点击“Normal.NewMacrol.Yuan”便可以了。
二、宏的编辑
宏录制器将以上宏操作翻译为Visual Basic代码。但是,录制宏时会受到一些限制。许多复杂的宏,例如,要用到循环语句,便无法录制。为了提高录制的宏的功能,就可能需要修改录制到模块中的代码。
具体操作为:单击“工具”选单中“宏”子选单,再单击“宏”命令。选择第二步中的宏名称,再单击“编辑”按钮。
然后便加载Visual Basic编辑器,我们可以看到所录制的宏自动生成的Visual Basic代码。
例如,在C:\My Document中有200个Word文档,依次命名为“1.doc”,“2.doc”,“3.doc”,…“200.doc”,我们需要把文件格式改变为文本文件,即txt文件。
先以1.doc为例,录制一个宏,打开文档,另存为txt文件,再关闭该活动文档。生成的Visual Basic代码如下:
Sub Macro1()
ChangeFileOpenDirectory ″C:\My document″
Documents.Open FileName:=″1.doc″
ActiveDocument.SaveAs FileName:=″1.txt″,FileFormat:=wdFormatText
ActiveWindow.Close
End Sub
下一步便进行编辑,用一个循环语句依次打开各个文件,转化后再关闭。代码如下:
Sub Macro1()
dim i
for i=1 to 200
ChangeFileOpenDirectory ″C:\My document″
Documents.Open FileName:=i & ″.doc″
ActiveDocument.SaveAs FileName:
=i & ″.txt″,
FileFormat:=wdFormatText
ActiveWindow.Close
next i
End Sub
再次运行该宏,便可以轻松完成任务。宏的作用由此可略见一斑。
在这里举一实例。例如,在Word 97中,要插入字符,则往往要到符号框中查找半天。对于一些常用的符号,如“¥”,便可以使用宏来使工作简化。
1.单击“工具”选单中“宏”子选单,再单击“录制新宏”选项。
2.给宏取名为“Yuan”,再单击“键盘”。
3.在弹出的对话框中指定快捷键,可指定为“Ctrl+Y”,再关闭该对话框回到“录制宏”对话框。单击“确定”按钮启动记录器。
4.运行“插入”选单中的“符号”子选单,从弹出的“符号”框中选择“¥”,插入后再关闭。另外,也可以指定到工具栏,从弹出的“自定义”对话框中的“命令”栏中把“Normal.NewMacro1.Yuan”拖放到工具栏中。
5.单击“停止录制”工具栏中的“停止录制”按钮。
6.单击“工具”选单中“宏”子选单,再单击“宏”命令。
7.选择第二步中的宏名称,再单击“编辑”按钮。
这时我们可以从中看到以下代码:
Sub Yuan()
Selection.InsertSymbol Font:=″楷体—GB2312″,CharacterNumber:=-27,Unicode:=True
End Sub
以后,当你需要插入字符“¥”时,只需按下快捷键“Ctrl+Y”,或者是在工具栏点击“Normal.NewMacrol.Yuan”便可以了。
二、宏的编辑
宏录制器将以上宏操作翻译为Visual Basic代码。但是,录制宏时会受到一些限制。许多复杂的宏,例如,要用到循环语句,便无法录制。为了提高录制的宏的功能,就可能需要修改录制到模块中的代码。
具体操作为:单击“工具”选单中“宏”子选单,再单击“宏”命令。选择第二步中的宏名称,再单击“编辑”按钮。
然后便加载Visual Basic编辑器,我们可以看到所录制的宏自动生成的Visual Basic代码。
例如,在C:\My Document中有200个Word文档,依次命名为“1.doc”,“2.doc”,“3.doc”,…“200.doc”,我们需要把文件格式改变为文本文件,即txt文件。
先以1.doc为例,录制一个宏,打开文档,另存为txt文件,再关闭该活动文档。生成的Visual Basic代码如下:
Sub Macro1()
ChangeFileOpenDirectory ″C:\My document″
Documents.Open FileName:=″1.doc″
ActiveDocument.SaveAs FileName:=″1.txt″,FileFormat:=wdFormatText
ActiveWindow.Close
End Sub
下一步便进行编辑,用一个循环语句依次打开各个文件,转化后再关闭。代码如下:
Sub Macro1()
dim i
for i=1 to 200
ChangeFileOpenDirectory ″C:\My document″
Documents.Open FileName:=i & ″.doc″
ActiveDocument.SaveAs FileName:
=i & ″.txt″,
FileFormat:=wdFormatText
ActiveWindow.Close
next i
End Sub
再次运行该宏,便可以轻松完成任务。宏的作用由此可略见一斑。
请教 office应用 WORD的目录连接
女友想学office 软件,可她要求结合实例来学。有没有比如象word这样的操作考题啊
提供WORD和EXCEL应用实例的网站
谁能提供一些word和excel的应用实例?
TDA8145应用实例
单片机应用实例
spss应用实例分析
spss应用实例分析
统计学应用实例
平面镜应用的实例
word标点符号实例
WORD排版实例
word应用
购买力平价的应用实例?
回归分析方法应用实例
msde的实例应用问题?
有没有反冲力应用实例?
微观经济学理论和实例应用
跪求密度应用实例
Micrsoft office word问题?
关于OFFICE 2000 WORD
office word 2003
office word 求救!
office word问题