第一步：点击录制宏
第二步：填写宏的方法名
第三步：进行一系列的操作之后，关闭宏
第四步：根据自己的需要查看，修改宏
第六步：保存，一般是另存为，后缀名为.xlsm，否则宏语言不能保存。
到此为止恭喜你一个简单的宏已经制作成功，当然宏也可以调用Excel中的公式，例如：sum等，排序，布局，查询，等。
Excel中常用对象的简单介绍：
|
对象名 |
含义 |
|
Application |
代表整个 Excel 应用程序。 |
|
Window |
代表窗口 |
|
Worksheet |
代表一个工作表 |
|
Sheets |
指定的或活动工作簿中所有工作表的集合 |
|
ShapeRange |
代表形状区域，它是文档中的一组形状 |
|
PivotTable |
代表工作表上的数据透视表 |
|
Workbook |
代表一个 Excel 工作簿 |
|
Shape |
代表绘图层中的对象，例如自选图形、任意多边形、OLE 对象或图片 |
Range |
代表某一单元格、某一行、某一列、某一选定区域，或者某一三维区域 |
|
Name |
代表单元格区域的定义名。名称可以是内置名称（如Print_Area）或自定义名称 |
|
Chart |
代表工作簿中的图表 |
|
FileDialog |
提供文件对话框，其功能与 Office 应用程序中标准的“打开”和“保存”对话框类似 |
|
CommandBarPopup |
代表命令栏上的一个弹出式控件 |
|
CommandBar |
代表容器应用程序中的一个命令栏 |
workSheet工作薄的方法
|
名称 |
说明 |
|
Add |
新建工作表、图表或宏表。新建的工作表将成为活动工作表 |
|
Copy |
将工作表复制到工作簿的另一位置 |
|
Delete |
删除对象 |
|
FillAcrossSheets |
将单元格区域复制到集合中所有其他工作表的同一位置 |
|
Move |
将工作表移到工作簿中的其他位置 |
|
PrintOut |
打印对象 |
|
PrintPreview |
按对象打印后的外观效果显示对象的预览 |
|
Select |
选择对象 |
算术运算符
|
运算符 |
功能 |
|
^ |
求一个数字的某次方，如 A^B |
|
* |
乘法运算 |
|
/ |
除法运算 |
|
\ |
对两个数作除法并返回一个整数 |
|
Mod |
求两数的余数 |
|
+ |
加法运算 |
|
- |
减法运算 |
比较运算符
|
符号 |
功能 |
|
< |
小于 |
|
<= |
小于或等于 |
|
> |
大于 |
|
>= |
大于或等于 |
|
= |
等于 |
|
<> |
不等于 |
逻辑运算符
|
符号 |
功能 |
|
And |
用来对两个表达式进行逻辑连接 |
|
Eqv |
用来对两个表达式进行逻辑等价运算 |
|
Imp |
用来对两个表达式进行逻辑蕴涵运算 |
|
Not |
用来对表达式进行逻辑否定运算 |
|
Or |
用来对两个表达式进行逻辑析取运算 |
|
Xor |
用来对两个表达式进行逻辑互斥或运算 |
字符串处理函数
|
作用 |
关键字 |
|
Option Compare |
设置字符串比较规则 |
|
StrComp |
比较两个字符串（字符相似判断） |
|
StrConv |
字符串类型转换 |
|
Lcase、Ucase |
大小写变换 |
|
Spase、String |
重复字符串 |
|
Len |
计算字符串长度 |
|
Format |
设置字符格式 |
|
LSet、Rset |
重排字符串 |
|
InStr、Left、Ltrim、Mid、Right、Rtrim、Trim |
处理字符串 |
|
Split、Join |
拆分与联接字符串 |
VBA的数据类型
|
数据类型 |
存储空间大小 |
范围 |
|
Byte |
1 个字节 |
0 到 255 |
|
Boolean |
2 个字节 |
True 或 False |
|
Integer |
2 个字节 |
-32,768 到 32,767 |
|
Long(长整型) |
4 个字节 |
-2,147,483,648 到 2,147,483,647 |
|
Single(单精度浮点型) |
4 个字节 |
负数时从 -3.402823E38 到 -1.401298E-45；正数时从 1.401298E-45 到 3.402823E38 |
|
Double(双精度浮点型) |
8 个字节 |
负数时从 -1.79769313486231E308 到 |
|
Currency(变比整型) |
8 个字节 |
从 -922,337,203,685,477.5808 到 922,337,203,685,477.5807 |
|
Decimal |
14 个字节 |
没有小数点时为 +/-79,228,162,514,264,337,593,543,950,335，而小数点右边有 28 位数时为 +/-7.9228162514264337593543950335；最小的非零值为 +/-0.0000000000000000000000000001 |
|
Date |
8 个字节 |
100 年1月1日到9999年12月31日 |
|
Object |
4 个字节 |
任何 Object 引用 |
|
String(变长) |
10 字节加字符串长度 |
0 到大约 20 亿 |
|
String(定长) |
字符串长度 |
1 到大约 65,400 |
|
Variant(数字) |
16 个字节 |
任何数字值，最大可达 Double 的范围 |
|
Variant(字符) |
22 个字节加字符串长度 |
与变长 String 有相同的范围 |
|
用户自定义 |
所有元素所需数目 |
每个元素的范围与它本身的数据类型的范围相同。 |
数据类型的转换
|
函数 |
返回类型 |
expression 参数范围 |
|
CBool |
Boolean |
任何有效的字符串或数值表达式 |
|
CByte |
Byte |
0 至 255 |
|
CCur |
Currency |
-922,337,203,685,477.5808 至922,337,203,685,477.5807 |
|
CDate |
Date |
任何有效的日期表达式 |
|
CDbl |
Double |
负数从 -1.79769313486231E308 至 -4.94065645841247E-324；正数从 4.94065645841247E-324 至 1.79769313486232E308 |
|
CDec |
Decimal |
零变比数值，即无小数位数值，为+/-79,228,162,514,264,337,593,543,950,335。对于 28 位小数的数值，范围则为+/-7.9228162514264337593543950335；最小的可能非零值是 0.0000000000000000000000000001。 |
|
CInt |
Integer |
-32,768 至 32,767，小数部分四舍五入 |
|
CLng |
Long |
-2,147,483,648 至 2,147,483,647，小数部分四舍五入 |
|
CSng |
Single |
负数为 -3.402823E38 至 -1.401298E-45；正数为 1.401298E-45 至 3.402823E38 |
|
CStr |
String |
依据 expression 参数返回 Cstr |
|
CVar |
Variant |
若为数值，则范围与 Double 相同；若不为数值，则范围与 String 相同 |
方法参数介绍
|
部分 |
功能详解 |
|
Optional |
可选的。表示参数不是必需的关键字。如果使用了该选项，则 arglist 中的后续参数都必须是可选的，而且必须都使用 Optional 关键字声明。如果使用了 ParamArray，则任何参数都不能使用 Optional |
|
ByVal |
可选的。表示该参数按值传递 |
|
ByRef |
可选的。表示该参数按地址传递。ByRef 是 Visual Basic 的缺省选项 |
|
ParamArray |
可选的。只用于 arglist 的最后一个参数，指明最后这个参数是一个 Variant 元素的 Optional 数组。使用 ParamArray 关键字可以提供任意数目的参数。ParamArray 关键字不能与 ByVal，ByRef，或 Optional 一起使用 |
|
varname |
必需的。代表参数的变量的名称；遵循标准的变量命名约定 |
|
type |
可选的。传递给该过程的参数的数据类型，如果没有选择参数 Optional，则可以指定用户定义类型，或对象类型 |
|
defaultvalue |
可选的。任何常数或常数表达式。只对 Optional 参数合法。如果类型为 Object，则显式的缺省值只能是 Nothing |
简单宏例子：
Sub 宏1() ' ' 宏1 宏 ' ' Sheets("Sheet2").Select ActiveWindow.SmallScroll Down:=-18 Range("A1").Select ActiveCell.FormulaR1C1 = "第一步：点击录制宏" Range("A43").Select ActiveCell.FormulaR1C1 = "第二步：填写宏的方法名" Range("C45").Select ActiveSheet.Paste ActiveWindow.SmallScroll Down:=21 Sheets("Sheet1").Select ActiveWindow.SmallScroll Down:=-9 Range("C3").Select End Sub Sub 宏2() ' ' 宏2 宏 ' Range("B14").Select ActiveCell.FormulaR1C1 = "=SUM(R[-13]C:R[-1]C)" End Sub
到此为止VBA的介绍已经完成，VBA中的语法与VB的语法基本上一样，也许会有版本不懂略有差别。
Excel有数百个对象，表4-1是常见对象名称其及含义
