1.打开编辑器
工具-选项,可设置编辑器字体大小等
2. 运行
快捷键F5,或 运行-运行宏
若提示宏被禁止,解决办法之一:工具-宏-安全性-安全级-中,关闭excel重新打开,启用宏
保存文件格式为xla或xlam
3. 基本语法
- 注释:单引号
- 强制转行:两个空格,下划线,回车(单行较长时使用)
- 变量声明:optionexplicit,加在首行
- 调试:单行调试F8,单击最左边设置断点
- 基本运算符、通配符、数据类型等:
符号 | 说明 | 符号 | 说明 |
---|---|---|---|
and | 与 | or | 或 |
& | 连接变量和字符串,前后有空格 | <> | 不等于 |
in | 在什么里 | like | 可使用通配符 |
* | 任意个字符 | ? | 一个字符 |
# | 一个数字 | [A-W a-w] | a-w或A-W中的一个字符 |
[!0-9] | 非0-9的字符 |
- 常用语句
语句 | 说明 | 示例 |
Dim | 声明变量,分配存储空间
| Dim x As Integer 整数 Dim st As String 文本 Dim rg As Range 对象 Dim arr(1 to 10) As Integer 数组 Dim X As New Worksheet |
Set | 分配对象,赋值 | Set rg = Range("A1")
|
Sub | 声明过程主体(实现一个功能) Sub开始,以End Sub结尾
| Sub test() Cell test End Sub |
If...Then...Else | 条件语句 If 块必须以 End If 语句结尾 | If x > 10 Then x = x +1 End If |
4.单元格
语句 | 语法 | 说明 | 示例 |
Cells | cells(i,j):第i行的第j列单元格 | 字体属性: cells.font cells.font.size cells.font.color cells.font.name cells.font.fontstyle 背景色属性: cells.Interior.color | Cells(1, 1).Select 选中单元格 cells(1,2)=cells(1,1) 赋值 |
Range | Range(Start, [End]) | 非常适合用于数据处理和分析,如读取、修改、筛选、排序工作表中的数据。 | Range("A1") 单个单元格 Range("A1:B3") 单元格区域 Range("C:C") 整列 Range(Cells(1,4),Cells(1,4)) |