VBA 数据类型基础教程
在介绍 VBA 变量的教程中，初步学习了数据类型相关知识。VBA 中虽然不强制指定数据类型，但是正确使用数据类型，可以使程序更易理解，也能提高程序的运行效率。
今天通过实际的代码例子，进一步学习 VBA 中的数据类型。
文本类型
文本类型可以说是最常用的数据类型。实际中，几乎所有的数据均是文本类型。因此理解好文本是学习 VBA 的基础。
| 类型 | 说明 | 数据范围 |
|---|---|---|
| String | 文本类型 | 0 至 20亿字符 |
首先，声明一个文本类型变量，String是类型标识符，语法如下：
Dim name As String
VBA 中，文本需使用英文双引号表示。
name = "Zhang San"
如果把数字两端加上双引号，它会变成文本类型，不再表示数字
name = "101"
可以使用单元格内的文本，给文本类型变量赋值。
name = Range("A1")
与 Excel 提供的文本函数一样，VBA 也提供多种文本函数，可直接在程序中使用，包括：
- Format：格式化数据，并以文本类型返回
- InStr：返回指定字符的位置
- InStrRev：反方向返回指定字符位置
- Left：返回左侧指定长度文本
- Len：返回文本长度
- LCase：大写字母转换成小写字母
- LTrim：清除开头的空格
- Mid：返回指定的开始和结束位置之间的文本
- Replace：替换文本中的指定字符
- Right：返回右侧指定长度文本
- RTrim：清除末尾处的空格
- Space：返回指定重复数的空格文本
- StrComp：返回比较两个文本的结果
- StrConv：将文本转换成指定格式
- String：返回指定重复数的文本
- StrReverse：逆转提供的字符串
- Trim：清除开头和结尾处的空格
- UCase：将小写字母转换成大写字母
每个函数的用法，在「内置函数」一章中详细介绍。
数字类型
数字类型是第二个基础数据类型。在写 VBA 代码时，应根据具体的数字大小，选择合适的数字类型。
如果小数字使用大范围数字类型存储，会浪费计算机内存；如果大数字使用小范围的数字类型存储，VBA 会自动转换成对应小范围数字，导致数字丢失精度。
VBA 中的数字类型包括如下几种。
| 类型 | 说明 | 数据范围 |
|---|---|---|
| Byte | 字节 | 0 至 255 |
| Integer | 整数 | -32,768 至 32,767 |
| Long | 长整数 | -2,147,483,648 至 2,147,483,648 |
| Single | 单精度浮点数 | 在表示负数时： -3.402823E38 ~ -1.401298E-45 在表示正数时： 1.401298E-45 ~ 3.402823E38 |
| Double | 双精度浮点数 | 在表示负数时： -1.79769313486231E308 ~ -4.94065645841247E-324 在表示正数时： 4.94065645841247E-324 ~ 1.79769313486231E308 |
| Currency | 货币 | -922,337,203,685,477.5808 至 922,337,203,685,477.5807 |
| Decimal | 定点数 | 未放置定点数： +/- 79,228,162,514,264,337,593,543,950,335 放置定点数： +/- 7.9228162514264337593543950335 |
其中，Integer、Long、Double是常用到的数字类型。
与文本相似，声明数字类型，使用如下语句：
Dim age As Integer
以上定义一个岁数变量，使用基本的 Integer 整数类型即可。
数字类型变量可以像数字一样，参与各类算数运算：
age = 3
age * 2 + 10 ‘-> 16
更多数字类型相关的内容，将在以后的教程中详细介绍。
逻辑类型
逻辑类型只有两个值，True 和 False，即真与假。
| 类型 | 说明 | 数据范围 |
|---|---|---|
| Boolean | 逻辑值 | True 或 False |
逻辑值虽然只有两个，但是在程序中有着广泛的应用。VBA 中判断语句中，经常能用到逻辑值。
首选，声明一个逻辑变量，使用如下语句：
Dim isPass As Boolean
给逻辑变量赋值时，可以直接使用逻辑值，也可以使用返回逻辑值的表达式。
isPass = False
isPass = 70 >= 60
日期和时间类型
VBA 中的日期和时间使用数字表示，整数部分代表日期，小数部分代表时间。
- 日期从 100-1-1 开始到 9999-12-31。
- 时间从 00:00:00 到 23:59:59。
声明日期类型变量，使用如下语句：
Dim birthday As Date
Dim time As Date
给日期变量赋值时，可以直接把日期放置在两个 # 之间赋值，也可以使用数字，还可以把日期作为文本赋值：
birthday = #2018-1-1#
birthday = 43101
birthday = "2018-1-1"
time = #12:00:00#
time = 0.5
time = "12:00:00"
Variant 类型
Variant 类型是一种通用类型，可以表示任何一种类型的数据。它也是声明变量未指定数据类型时的默认类型。
虽然 Variant 类型方便，但是相应的，占用更大的内存空间，也会影响程序运行效率。因此建议，在明确知道数据时何种类型时，指定数据类型；如果数据类型是可变的或不明确，使用 Variant 类型。
应该是“清除开头和结尾处的空格，直到遇到第一个非空格字符。”
感谢反馈，已修正
为什么name = Range(“A1”)就可以直接提取到单元格A1中的值，而不需要使用name = Range(“A1”).Value,这在其他语言中，前者一般是直接赋值了一个对象，而在VBA中两种方法都可行？
根据官方文档，如果不使用 Value，VBA 会自动加上Value，因此两种写法都可以获取单元格的值
给逻辑变量赋值时（写成是了），可以直接使用逻辑值，也可以使用返回逻辑值的表达式（最后这句话不懂）。
错别字已修改，感谢反馈。
使用返回逻辑值的表达式，指的是提供一个表达式，该表达式的结果是逻辑值。例如，1>0 这个表达式返回 true；100 < 50 返回 false。
很好
您好，vba中写range(“A2”)和cells(2,1)有什么区别吗
仅就结果而言，没什么区别。引用单元格的两种方式
Sub mycode2()
Dim name As String
name = “Zhang San”
MsgBox “name”
End Sub
为什么我这里提示框弹出来的不是“Zhang San”呢？
双引号内的内容是文本，不是变量。应该这么写：
MsgBox name
日期和时间类型的显示状态不一样是因为什么
birthday = #1/1/2018#
time = #12:00:00 PM#
这个没有关系的，跟系统的日和时间格式设置有关，正常情况
age * 2 + 10 ‘-> 16 这一行会报错误 稍微修改了一下 ： Dim age As Integer Dim old As Integer age = 3 old = age * 2 + 10 '-> 16 Range("A2") = old感谢指出。是的，这里是为了演示，没有写完整的语句。
为啥评论两次不给通过。。。Byte是字节，bit才是比特。。。1字节等于8比特。。。
抱歉。不是不通过，之前没查看评论。文章已更新，感谢反馈
byte是比特吗？我印象中bit是来着。也可能是我记错了
对，byte是字节，bit才是比特。
byte是字节，bit是比特。你记对了。
age * 2 + 10 ‘-> 16
请问这里有个单引号，是什么意思？
这个是 VBA 的注释符号，单引号后的内容不会被执行
明白，谢谢，以为是多出了一个单引号
加油加油！