一、数据类型
| 数据类型 | 代码 | 声明字符 | 范围描述 |
|---|---|---|---|
| 整数型 | Integer | % | -32768~32767之间的整数 |
| 长整数型 | Long | & | -217473648~217473647之间的整数 |
| 单精度型 | Single | ! | |
| 双精度型 | Double | # | |
| 货币型 | Currency | @ | |
| 日期型 | Date | ||
| 文本型 | String | $ | |
| 布尔型 | Boolean | True 或 False | |
| 对象 | Object | 对象变量，用来引用对象 |
二、变量
- 强制声明变量
方法一：
在模块中的第一句写下如下代码：
Option Explicit
方法二:设置:
工具-选项-编辑器-勾选"要求变量声明"
- 变量类型及作用域
| 类型 | 作用域 | 描述 | 区别 |
|---|---|---|---|
| 本地变量 | 本过程中 | 在一个过程中,使用Dim或Static | 在过程中声明,不在过程前 |
| 模块级变量 | 本模块 | 第一个过程前,使用Dim或Private | 在模块的第一个过程前声明 |
| 公共变量 | 所有模块 | 在模块的第一个过程前,使用Public声明 | 在模块的第一个过程前声明 |
- 声明变量示例
1.本地变量
Option Explicit
sub 本地变量()
Dim a as integer 'Dim 声明在Sub 过程中,所以a为本地变量,作用域仅限于本过程
Static B As Integer 'Static声明在Sub 过程中,所以B为本地变量,作用域仅限于本过程
End sub
2.模块级变量
'以下代码写在模块中
Option Explicit
Dim a as integer 'Dim 声明在第一个Sub 过程前,所以a为模块级变量,作用域在本模块
Private B As Integer 'Private声明在第一个Sub 过程前,所以B为模块级变量,作用域在本模块
sub 本地变量
Msgbox "你好!"
End sub
3.公共变量
'以下代码写在模块中
Option Explicit
Public a as integer 'Public 声明在第一个Sub 过程前,所以a为公共变量,作用域在该Workbook的所有模块
Sub 本地变量
Msgbox "你好!"
End sub
- 把数据存储到变量里
把数据存储到变量里,称为给变量赋值
1.给数值\日期\文本等数据变量赋值用等号"="
Sub text
Dim Str as string '声明str变量为string型
Let Str="你好! " '给变量str 赋值,"Let"通常省略不写
Range("A1")=Str '将变量值写入活动工作表的A1单元格
End sub
2.给对象变量赋值:必须用Set
Sub text
Dim Rng as Range
set rng = worksheets("sheet1").range("A1")
rng.value="你好!" ' ".Value"通常也省略不写
End Sub
三.常量
- 常量用一存储一些固定的,不会被修改的值,如圆周率,个人所得税率等
- 常量也需要声明(名称\数据类型),并且要赋值,且在赋值后不能再次赋值
- 常量用Const 变量名 As 数据类型 = 数值的格式赋值
sub text
const P as single = 3.14
Range("a1") = P
end sub
- 常量的作用域
常量的作用域同变量一样,可用于sheets中,也可写在模块中
| 类型 | 作用域 | 描述 | 区别 |
|---|---|---|---|
| 本地变量 | 本过程中 | 在一个过程中,使用Const | 在过程中声明,不在过程前 |
| 模块级变量 | 本模块 | 第一个过程前,使用Const | 在模块的第一个过程前声明,跟变量不一样,不能用Private声明 |
| 公共变量 | 所有模块 | 在模块的第一个过程前,使用Public声明 | 在模块的第一个过程前声明 |
