Excel 2007 VBA 教程
图 4
11.2 自动弹出成员列表：自动弹出成员列这个功能对于初学者和老用户来说都是非常有用，因为我们刚学
的时候，特别是英文基础差一点的学生来说，可以给大家很大的帮助。举个例子，工具菜单，选项，编辑器，钩起“自动列出成员（L）”，然后在任何代码窗口中输入“Sheets加上一个点号”，就会弹出如（图 5）所以的成员列表，绿色图标的是方法，有一个手形的图标是属性
图 5
11.3 要求声明变量：举个例子，工具菜单——>>选项——>>编辑器——>>钩起“要求变量声明（R）”，然后
新建一个标准模块，就会在新建标准模块的最顶端会自动添加Option Explicit然后在标准模块里输入，按F5执行代码，就会弹出（图 6）这样的提醒，如果我们把Option Explicit这一句删除，再按F5执行代码就不会弹出（图 6）这样的提醒 Sub test()
Set MyRg = Range(\ MsgBox MyRg End Sub
第 3 页 共 52 页
Excel 2007 VBA 教程
图 6
11.4 自动显示数据提示：举个例子，工具菜单，选项，编辑器，钩起“自动显示数据提示（S）”，然后新建
一个标准模块，输入以下代码 Sub test()
Set MyRg = Range(\ MsgBox MyRg
Set MyRg = Nothing End Sub
主要是便于代码逐步或者设置断点调试，想知道变量的值时，这时把光标移到变量上，就会弹出一个提示如（图 7）所示
图 7
12 运行过程，中断，重新设置，在工具栏上用方框框起来的三个按钮分别表为“运行子过程/用户窗体”；“中断”；
“重新设置”。如（图 8）
图 8
12.1 运行过程分为全过程运行（快捷键F5）和逐步运行（快捷F8）
12.2 重新设置，当逐步运行时，想取消逐步运行，按一下“重新设置”这个按钮。 13 中断：相当于按了一下Esc，当一个过程运行进入了死循环，这时可以按一下Esc
第 4 页 共 52 页
Excel 2007 VBA 教程
第二讲 录制宏 指定宏 运行宏 修改宏 保存宏 加载宏
一、录制宏
1、 显示“开发工具”选项卡方法：Office按钮——>>Excel选项——>>常用——>>在功能区显示“开发工
具”选项卡
2、 录制在A1单元格输入“培训”这样一个宏
3、 录制方法 “开发工具”选项卡——>>代码组——>>录制宏——>>弹出一个“录制新宏”对话框——>>
输入宏名为“输入”——>> 确定——>> 选中A1单元格——>> 输入“培训”——>单击一下编辑栏的钩——>>停止录制
二、查看宏
1、 方法一 在上一节课我们已知知道了，相信大家没有忘记那个快捷键，如果忘记了，我就晕了。Alt+F11，
双击模块1——>>便可以看到刚才录制的代码
2、 方法二 “开发工具”选项卡——>>代码组——>>单击一下Visual Basic按钮——>>双击模块1——>>
看到以下代码 Sub 输入() '
' 输入 Macro ' '
Range(\
ActiveCell.FormulaR1C1 = \培训\End Sub 三、指定宏
1、 方法一 “开发工具”选项卡——>>控件组——>>插入——>>表单控件——>>单击一下“按钮”——>>
按住左键不放，在工作表里拖拉一下——>>画完后，弹出一个对话框，指定宏——>>选中“输入”——>>确定
2、 其它方法 也可以把宏指定给其它对象，如“自选图形”里的圆，艺术字
A、 打开比方，指定给艺术字的方法 把光标定位到你要指定的艺术字——>>右击——>>指定宏——>>弹出“指定宏”对话框——>>选中“输入”——>>确定
3、 修改“按钮”的名字 方法 把光标定位到按钮上——>>右击——>>编辑文字——>>修改为“输入” 四、运行宏
1、 方法一 我们先删除A1单元格里的内容——>>单击一下“输入”按钮
2、 方法二 “开发工具”选项卡——>>代码组——>>单击一下“宏”按钮——>>选中“输入”——>>单击一
下“执行”
3、 其它方法 我们在上一节课讲过，在VBE编辑器里，把光标定位到你“输入”的宏过程任何一行代码里，
运行F5，逐步运行F8
五、修改宏
1、 选中A1:D9单元格区域，录制一个给它添加边框的宏，录制的代码如下 Sub 添加边框() '
' 添加边框 Macro ' '
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
第 5 页 共 52 页
Excel 2007 VBA 教程
Selection.Borders(xlDiagonalUp).LineStyle = xlNone With Selection.Borders(xlEdgeLeft) .LineStyle = xlContinuous .ColorIndex = xlAutomatic .TintAndShade = 0 .Weight = xlThin End With
With Selection.Borders(xlEdgeTop) .LineStyle = xlContinuous .ColorIndex = xlAutomatic .TintAndShade = 0 .Weight = xlThin End With
With Selection.Borders(xlEdgeBottom) .LineStyle = xlContinuous .ColorIndex = xlAutomatic .TintAndShade = 0 .Weight = xlThin End With
With Selection.Borders(xlEdgeRight) .LineStyle = xlContinuous .ColorIndex = xlAutomatic .TintAndShade = 0 .Weight = xlThin End With
With Selection.Borders(xlInsideVertical) .LineStyle = xlContinuous .ColorIndex = xlAutomatic .TintAndShade = 0 .Weight = xlThin End With
With Selection.Borders(xlInsideHorizontal) .LineStyle = xlContinuous .ColorIndex = xlAutomatic .TintAndShade = 0 .Weight = xlThin End With End Sub
2、 修改后的代码 Sub 添加边框()
With Selection.Borders
.LineStyle = xlContinuous .ColorIndex = xlAutomatic .TintAndShade = 0 .Weight = xlThin End With
第 6 页 共 52 页
Excel 2007 VBA 教程
End Sub
从上面的代码可以看出，录制宏会录制出许多多余的代码出来。因此要把它们去掉，绿色是注释也把删除，它是对上边框，下边框，左边框，右边框 ，中间横线，中间的竖线一个一个处理，因此用With Selection.Borders对所有的边框 六、保存宏
1、 保存带有宏的工作簿（xlsm）如图10
A、 当我们保存带有宏的工作簿时，会弹出一个这样的提示对话框如图9往往没有接触过宏的朋友会吓一跳的，其实我们把下面这个图里的字读一次，就明白了，原来要保存为“启用宏工作簿”这个是2003版有区别的，微软公司的目的就是让用户在未打开之前提醒用户这个是带有宏的工作簿
图 9
图 10
七、保存为加载宏（xlam）如图11
1、 选择“Excel加载宏（*xlam）就会自动打开这个文件夹C:\\Documents and
Settings\\Administrator\\Application Data\\Microsoft\\AddIns，然后输入你的加载宏名
图 11
2、 加载宏的特点
A、 隐藏的
B、 一打Excel程序就会打开 3、 加载“加载宏”
A、 Office按钮——>>Excel选项——>>加载项——>>转到——>>加载项对话框——>>钩起“加载项名”前面的钩——>>确定 4、 删除加载宏
A、 2007删除加载宏比较麻烦，2010版的就改良这个，2010版直接在开始工具选项卡，有一个“加载项按钮”，那么2007怎么删除它呢？Office按钮——>>Excel选项——>>加载项——>>转到——>>加载项对话框——>>去掉“加载项名”前面的钩——>>确定
八、保存为个人宏工作簿：在我们录制宏时，有时我们可以选中“保存为个人宏工作簿”，便可以在所有的工作簿
中用，不过有个缺点，会打开个人宏工作簿，所以建议大家用“加载宏”，保存“个人宏工作簿”是对VBA新手打造的。
第 7 页 共 52 页