Excel宏编程简明教程
一）、宏学习
首先需要明确的是，本文不可能教会您关于宏的所有内容。 您需要学会利用 \录制宏\的方法来学习宏：点击Excel\工具\下拉菜单中\宏\下？quot;录制新宏 \，此后可象平时一样进行有关操作，待完成后停止录制。然后再点击 \工具\下 拉菜单中\宏\下\宏\的\编辑\选项即可打开刚才所录制的宏的 Visual Basic 源 程序，并且可以在此时的\帮助\下拉菜单中获得有关的编程帮助。 对录制宏进行 修改不仅可以学习宏的使用，还能大大简化宏的编写。
二）、基本概念
为了学习Excel中的宏，我们需要先了解以下一些基本概念。
1、工作簿： Workbooks、Workbook ActiveWorkbook、ThisWorkbook
Workbooks集合包含Excel中所有当前打开的Excel工作簿，亦即所有打开 的Excel文件；Workbook对应 Workbooks中的成员，即其中的 Excel文件； ActiveWorkbook代表当前处于活动状态的工作簿，即当前显示的 Excel文件；
ThisWorkbook代表其中有Visual Basic 代码正在运行的工作簿。
在具体使用中可用 Workbooks（index）来引用 Workbook对象，其中index为 工作簿名称或编号；如 Workbooks。）、Workbooks（\年度报表.xls\）。而编号按 照创建或打开工作簿的顺序来确定，第一个打开的工作簿编号为 1,第二个打开 的工作簿为2 。
2、工作表： Worksheets、Worksheet、ActiveSheet
Worksheets
集合包含工作簿中所有的工作表，即一个 Excel文件中的所有 数据表页；而 Worksheet则代表其中的一个工作表；ActiveSheet代表当前处于 的活动状态工作表，即当前显示的一个工作表。
可用 Worksheets（index）来引用 Worksheet对象，其中index为工作表名称 或索引号；如 Worksheets（1）、Worksheets（\第一季度数据\）。工作表索引号表 明该工作表在工作表标签中的位置：第一个（最左边的）工作表的索引号为 1, 最后一个（最右边的）为Worksheets.Cou nt。需要注意的是：在使用过程中Excel 会自动重排工作表索引号，保持按照其在工作表标签中的从左至右排列， 工作表 的索引号递增。因此，由于可能进行的工作表添加或删除，工作表索引号不一定 始终保持不变。
3、图表：Chart、Charts、ChartObject、ChartObjects、ActiveChart
Chart代表工作簿中的图表。该图表既可为嵌入式图表（包含在ChartObject 中），
也可为一个分开的（单独的）图表工作表。
Charts代表指定工作簿或活动工作簿中所有图表工作表的集合，但不包括 嵌入式在工作表或对话框编辑表中的图表。使用 Charts（i ndex） 可引用单个 Chart图表，其中index是该图表工作表的索引号或名称；如Charts（1）、Charts（\销售图表\）0图表工作表的索引号表示图表工作表在工作簿的工作表标签栏上的 位置。Charts（1）是工作簿中第一个（最左边的）图表工作表； Charts（Charts.Cou nt） 为最后一个（最右边的）图表工作表。
ChartObject代表工作表中的嵌入式图表，其作用是作为Chart对象的容器。
利用Chartobject可以控制工作表上嵌入式图表的外观和尺寸。
Chartobjects代表指定的图表工作表、对话框编辑表或工作表上所有嵌入 式图表的集合。可由 ChartObjects(index) 引用单个ChartObject，其中index 为嵌入式图表的编号或名称。如 Worksheets(\、 Worksheets(\分别对应\工作表中的 第一个嵌入式图表、以及名为\的嵌入式图表。
ActiveChart可以引用活动状态下的图表，不论该图表是图表工作表，或嵌 入式图表。而对于图表工作表为活动工作表时， 用之。 还可以通过ActiveSheet属性引
4、 单元格：Cells、ActiveCell、Range Areas
Cells(row,colum n) 代表单个单元格，其中 row为行号，column为列号。如 可以用 Cells(1,1) 、Cells(10,4) 来引用\、
\单元格。ActiveCell 代表 活动工作表的活动单元格，或指定工作表的活动单元格。
Ran ge代表工作表中的某一单元格、某一行、某一列、某一选定区域(该选 定区域可包含一个或若干连续单元格区域)或者某一三维区域。
可用Range(arg)来引用单元格或单元格区域，其中 arg可为单元格号、单 元格号范围、单元格区域名称。女口 Range(\、Range(\、
Range(\。虽然可用Range(\返回单元格A1,但用Cells更方便， 因为此时可用变量指定行和列。
可将 Range与 Cells 结合起来使用，如 Range(Cells(1,1),Cells(10,10)) 代 表单元格区域\；而expression.Cells(row,column) 返回单元格区域中 的一部分，其中expression是返回Range的表达式，row和column为相对于该 区域的左上角偏移量。如由 Range(\引用单元格C5o
Areas为选定区域内的连续单元格块的集合，其成员是 Range对象。而其中 的每个Range对象代表选定区域内与其它部分相分离的一个连续单元格块。某些 操作不能在选定区域内的多个单元格块上同时执行； 必须在选定区域内的单元格 块数Areas.Count上循环，对每个单独的单元格块分别执行该操作。 此时，可用 Areas(index)从集合中返回单个Range对象，其中index为单元格块编号；如 Areas(1)。
5、 行与列：Rows Columns Row Column
Rows Columns分别代表活动工作表、单元格区域范围 Range指定工作表 中的所有行数、列数。对于一个多选单元格区域范围 Range的Rows Columns, 只返回该范围中第一个区域的行数、列数。例如，如果 Ra nge对象有两个区域 (areas) A1:B2 和 C3:D4，Rows.Count返回 2 而不是 4。
可通过Rows行号)、Columns(列号)来引用相应的行与列；女口 Rows(3)、 Columns(4)分别对应第三行、D列。
利用Rows Column可以获得区域中第一块的第一行行号、第一列列号，所得值 均以十进制数表示。
三) 、处理单元格 1、直接赋值与引用
将变量、常量值直接赋给单元格、或将单元格的值直接赋给变量、常量，这 是在Excel中最简单的单元格赋值及引用方法。如下例将工作表 \单 元格的值赋给Integer变量I，并将1+1的值赋给当前工作表中的B1单元格：
Dim I As In teger
EXCEL宏编程简明教学教程(有实例)
