Excel VBA 基础

• VBA 简介
• 启用开发工具选项卡
• 录制你的第一个宏
• 使用相对引用录制宏
• 保存宏
• Excel 支持的文件格式
• 在快速访问工具栏上添加宏
• 宏安全性设置
• 技巧：恢复 VBA 编辑器的默认窗口布局
• Sheets 与 Worksheets 在 Excel VBA 中的正确使用
• Excel VBA 代码名称详解

窗口和应用程序

• 自定义 Excel 标题栏
• 最大化应用程序窗口
• 设置 Excel 全屏显示
• 隐藏、取消隐藏、最小化功能区
• 自定义 Excel 状态栏信息
• 禁止触发相关 Excel 事件
• 暂停执行宏代码
• 阻止用户干预宏代码的运行
• 用变量名调用指定的宏过程
• 捕捉键盘输入
• 模拟键盘输入
• 捕获用户中断
• 使用 Application 级别事件

工作表和工作簿

• 在 VBA 中引用工作表的方法
• 添加新工作表
• 判断是否存在指定名称的工作表
• 在 Excel 中重命名工作表事件
• 按名称对工作表进行排序
• 限制工作表滚动区域
• 定义隐藏的名称

使用 Range 对象

• 在 VBA 中引用单元格区域
• 获取最后一个空单元格
• 使用 VBA 选择单元格区域常用代码
• 使用 VBA 定位特殊单元格
• 在 VBA 中复制和粘贴单元格区域
• 在 Excel VBA 中直接给单元格赋值
• 获取两个单元格区域的交叉区域
• 联合单元格区域
• 判断一个单元格区域是否包含在另一个单元格区域中
• 使用 VBA 将数字格式的显示结果转为数值
• 使用 VBA 给单元格区域添加边框
• 使用 VBA 设置字符格式
• 高亮显示单元格区域
• 将单元格公式转化为数值的方法
• 判断单元格公式是否存在错误
• 判断单元格区域是否有批注
• 设置单元格批注
• 操作合并单元格
• 判断单元格区域是否存在合并单元格
• 自动筛选数据
• 删除重复值
• 删除空行
• 一次插入多行
• 数据排序

功能区编程

• 使用 Office RibbonX 编辑器创建自定义功能区
• RibbonX 语法规则

高级编程

• 使用 VBA 获取屏幕分辨率和 PPI
• Excel VBA 中像素、磅、英寸、厘米之间的转换
• 使用 VBA 在屏幕上写字
• 使用 VBA 在屏幕上画椭圆
• 使用 VBA 在屏幕上画线

操作其它 Office 应用程序

• 前期绑定与后期绑定
• 使用 VBA 自动添加前期引用
• 在 Excel 中使用 VBA 操作 PowerPoint
• 在 Excel 中使用 VBA 操作 Word
• 在 Excel 中模拟 Word 的邮件合并功能
• 从 Excel 启动其他应用程序

代码调试及优化

• 使用 VBA 开启“信任对 VBA 工程对象模型的访问”
• 运行时错误 '1004‘: 不信任到 Visual Basic Project 的程序连接
• 如何避免在 Excel VBA 中使用 Select
• 加速 Excel VBA 代码的方法

在对工作表中的单元格区域进行操作时，通常需要指定引用的工作表，在 VBA 中引用工作表有以下几种方法：

使用工作表名称

工作表名称是显示在工作表标签中的文本，使用工作表名称引用工作表可以利用 WorkSheets 集合和 Sheets 集合两种引用方式，下面的两句代码都可以激活工作簿中名称为“Sheet1”的工作表，激活后工作表将成为活动工作表。

Worksheets("Sheet1").Activate
Sheets("Sheet1").Activate

WorkSheets 与 Sheets

WorkSheets 集合包含所有的工作表。

Sheets 集合不仅包含工作表集合 WorkSheets，还包含图表集合 Charts，宏表集合 Excel4MacroSheets 与 MS Excel 5.0 对话框集合等。详细区别与使用参见： Sheets 与 Worksheets 在 Excel VBA 中的正确使用

任何时刻工作簿中只有一个工作表是活动工作表。

任何时刻工作簿内至少要有一张可视表。

使用索引号

工作表索引号是工作表在工作簿中的位置，Excel 根据工作表在工作表标签中的位置以 1 开始从左向右进行编号。

例如，下面的两行代码都将激活第一个工作表：

Worksheets(1).Select
Worksheets(1).Activate

单个 WorkSheet 对象的 Select 方法与 Activate 方法的主要区别在于 Select 方法要求工作表可见，如果第一张工作表是隐藏的，使用 Worksheets(1).Select 将出错。

如果工作簿中不仅包含工作表，还包含图表或宏表等，此时使用索引号引用工作表可能不是同一个表。

例如：工作簿中从左向右的工作表为：Sheet1、Chart1、Sheet2，当使用 Sheets(2).Select 时激活的工作表是 Chart1 ，当使用 Worksheets(2).Select 时激活的工作表是 Sheet2 。

Worksheet 对象的 index 属性返回工作表的索引号，如下面的示例代码显示工作表"Sheet1”的索引号：

MsgBox Worksheets("Sheet1").Index

使用代码名称

工作表代码名称显示在 VBE 【工程资源管理器】窗口中，在【属性】窗口的【名称】项中能够修改工作表代码名称。如下图所示，工作表 Sheet1 的代码名称改为 MySheet1 。

我们能够直接使用工作表代码名称来引用工作表，使用工作表代码名称的好处是： 即使工作表名称被用户修改，代码仍然能够正常运行 。

可以使用 Worksheet 对象的 CodeName 属性返回工作表的代码名称，如下面的代码返回第一张工作表的代码名称：

MsgBox Worksheets(1).CodeName

更多关于如何使用和重命名代码称请参阅： 使用 VBA 代码名称详解 。

使用 ActiveSheet 引用活动工作表

以下示例代码将活动工作表的名称修改为“ 果果云课堂 ”，然后使用消息框显示工作表的名称和工作表的代码名称。

Sub UseName()
    With ActiveSheet
        .Name = "果果云课堂"
        MsgBox "名称为：" & .Name & vbCrLf & "代码名称为：" & .CodeName
    End With
End Sub

ActiveSheet 属性应用于 Application 对象 Window 对象和 Workbook 对象，返回代表活动工作簿或者指定的窗口或工作簿中的活动工作表，如果没有活动的工作表，该属性则返回 Nothing 。如果省略对象，该属性则返回活动工作簿中的活动工作表。