宏的录制与使用.ppt

《宏的录制与使用.ppt》由会员分享，可在线阅读，更多相关《宏的录制与使用.ppt（12页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、一、宏的录制与使用v 1.什么是宏宏是一连串可以重复使用的指令，并可以自动运行，宏是一个“过程”或“程序”，这个“过程”或“程序”的代码是自动录制进去的。当然宏也可以先录制再进行编辑以使其更紧凑和有效率。v 录制宏利用菜单提供的功能可以录制宏，当开始录制时，宏能够将你所有动作以代码的方式记录下来，而自动产生VBA 代码，再选自某个使用宏的办法（工具按钮、菜单或组合键）v 例1：在Word 中录制一个宏，把一个字右移一个位置（选择当前一个字，剪切它，将插入点右移一个字，再将字粘贴回去）1.选择“开发工具”组下的“录制宏”，则打开“录制宏”对话框，输入宏名，选择运行宏的方式、存放位置后确定开始录制

2、。2.选择当前一个字，剪切它，将插入点右移一个字，再将字粘贴回去3.完成后点击“停止”。v 例2：在EXCEL 中录制一个样本宏，用于创建一个新工作簿，将月份顺序输入工作簿中并保存。练习一v 练习1：录制两个宏，宏Ss 的功能是将字符变为下标；宏Swap 可以将两字符的位置互换，最后将宏放在“格式”工具栏中“字符缩放”按钮的右侧v 练习2：创建一个宏fkh,其快捷键为Ctrl+，其功能是输入符号“【】”，并将光标移至方括号内，等待用户输入其中的文字。v 练习3：在EXCEL 中录制一个宏，能够自动的将“A1”-”D9”单元格合并，并将单元格背景颜色改为蓝色。v 练习4：在EXCEL 中录制一个

3、宏，使用Ctrl+Shift+Z作为快捷键，分别在D4 和D5 单元格中输入5 和8，然后在D6 单元格计算D4 和D5 两个单元格的乘积。二、将宏指定到工具栏v 如果在录制宏时没有指定运行宏的方式，可以在录制完后再将宏指定到工具栏v 1.打开“选项”“自定义功能区”对话框v 2.在“从下列位置选择命令”下拉框 中选择“宏”，将显示我们所录制和编写的宏名。v 3.单击右下角的“新建选项卡”创建自定义的功能区，选中自己的宏名，单击“添加”按钮把它加到新建的选项卡上，然后确定。v 运行录制的宏 保存在当前工作簿中的宏，则在此工作簿的任何工作表中都可以运行，在个人工作簿的宏则可以运行任何工作簿的工作

4、表，在新工作簿的宏则必须打开新工作簿 快捷方式 利用录制时定义的快捷键或工具栏按钮 使用宏对话框 在VBE 编辑器中直接运行v 删除宏 可以在宏对话框或VBE 中删除三、运行和删除宏练习二v 练习1：把前面录制的宏指定到工具栏中。v 练习2：通过快捷键、工具栏按钮、宏对话框运行录制的宏。v 练习3：在宏对话框中删除一个宏四、宏代码的编辑与修改v 演示：录制一个宏，对宏代码进行编辑，了解VBE环境和VBA 程序的结构。v 演示：在EXCEL 的VBE 中编写宏，输入以下代码：Sub demo()Sheet1.Range(a1:d5).Select Selection.Value=12345 Sh

5、eet1.Range(g6)=Sheet1.Name Sheet1.Cells(10,6)=ThisWorkbook.NameEnd Sub练习三v 1.创建一个宏，能够在A1 到I9 单元格中填入数字，这些数字分别代表该单元格的行列号。例如在A1中填入11，B1 中填入12，I9 中填入99 等。然后将这些单元格字体设置为“黑体”，字号为20，颜色为蓝色。编辑查看这个宏的代码及程序的结构。v 2.在VBE 环境中创建“calc”宏，将“计算器”添加到Word 工具栏中，以加强Word 的计算功能。v 3.利用宏命令统计word 中某个文本出现的次数。五、用户输入与输出v 1.MsgBox 函

6、数v MsgBox 函数可用于在对话框中显示信息。一旦显示出来，消息框将一直保持，直至用户单击某个按钮为止。根据用户单击的按钮，会返回不同的整数值。v 语法:MsgBox(prompt,buttons,title,helpfile,context)v 这个函数必须具有的参数只有 prompt，即将在对话框中作为信息显示的字符串。如果去掉函数参数的括号，就是在告诉VBA 不需要函数的返回值。v 其它参数见帮助2.INPUTBOX 函数当只需做出“是”、“否”、“确定”、“取消”等简单的回答时，MsgBox 函数非常好用。但是，如果需要其他类型的输入，例如数字和文本时，就需要使用InputBox

7、函数，InputBox 函数显示一个对话框，并且提供便于用户输入的文本说明。其语法格式为：InputBox(prompt,title,default,xpos,ypos,helpfile,context)例：Dim iResult As IntegeriResult=InputBox(Please enter your favorite number:)MsgBox iResultActiveCell.Value=iResult练习四1.创建一个名为UserInfo 的过程。这个过程功能如下：1）显示三个输入框。第一个输入框提示用户输入名字，第二个输入框提示用户输入所居住的城市名，第三个提示用户输入年龄。2）在一个消息框中显示前三个输入框的结果。