《VBA之Excel应用》（版权10178983）是非常经典的，是我推出的第七套教程，定位于初级，目前是第一版修订。这套教程从简单的录制宏开始讲解，一直到窗体的搭建，内容丰富，实例众多。大家可以非常容易的掌握相关的知识，这套教程共三册，十七章，都是我们在利用EXCEL工作过程中需要掌握的知识点，希望大家能掌握利用。今日讲解的内容是VBA之Excel应用第五章第一节变量的常用类型
【分享成果，随喜正能量】万物皆有灵，草木亦有心。这世间，万事万物都是有回音的，大至一世界，小至一微粒，你拿出十分的善意，定会收到它以一百分的温柔回馈。
第五章第一节变量的常用类型
提到变量，在我之前的代码中其实已经反复地在应用，也就是各种声明语句中的声明。如：Dim i As Integer, j As Integer 就是声明i，j为Integer类型的变量。那么Integer类型的变量又是什么样的变量类型呢？我们这节就给大家详细地讲解。
另外，我们还要理解，在Excel VBA中声明，初始化和显示变量的意义：这种意义在于声明一个变量就是让VBA知道你将要使用一个变量；初始化意味着给变量分配一个开始(初始)值。
1Integer 整型变量
1）Integer 变量存储为 16 位（2 字节）数字，值范围为 -32,768 至 32,767。
2）Integer的类型声明字符是百分比符号“%”
Dim x%
3）应用实例：
我们看下面的代码：
Sub myNZ() 'Integer整型变量
'Dimx As Integer
Dimx%
Cells.Clear
x= 5 / 3
Range("A1").Value= x
End Sub
代码截图：
代码的返回结果：
2String 字符串型变量
1） 字符串变量用于存储文本。
2） 字符串有两种类型：可变长度字符串和固定长度字符串。
可变长度字符串最多可以包含大约 20 亿 (2^31) 个字符。
固定长度的字符串可以包含1到大约 64 K (2 ^ 16) 个字符。
l固定长度字符串，如果为public不能在类模块中使用。
3）固定字符串字符的代码范围为 0–255。字符集的前128个字符(0-127) 对应于标准美国键盘上的字母和符号。这些字符与ASCII字符集定义的字符相同。第二个128个字符(128 -255)表示特殊字符, 如国际字母表中的字母、重音、货币符号和分数。
4）字符串的类型声明字符是美元符号“$”.
5）可以通过以下两种方式之一在字符串文本中嵌入双引号标记:
① 使用两个双引号:
② 使用 Chr 函数;Chr(34)是一个双引号。
我们看下面的代码测试：
Sub myNZA() 'String 字符串型变量
DimX As String
Dims As String * 3
X= "abcdefghijklmnopqrstuvwxyz"
s= "abcdefghijklmnopqrstuvwxyz"
Range("A2").Value= X
Range("A3").Value= s
Range("A4").Value= """ & s & """
Range("A5").Value= Chr(34) & s & Chr(34)
End Sub
代码截图：
代码的测试结果：
3Double 双精度浮点变量类型
1） Double (双精度浮点) 变量存储为 IEEE 64 位 (8 字节) 浮点数字, 值范围为:
负值：-1.79769313486231E308 到 -4.94065645841247E-324
正值：4.94065645841247E-324 到 1.79769313486232E308
2）Double的类型声明字符是#.
3）Double类型的变量比Integer类型的变量更精确。
我们看下面代码：
Sub myNZB() 'Double 双精度浮点变量
'Dimx As Double
DimX#
Cells.Clear
X= 5 / 3
Range("A1").Value= X
End Sub
代码的测试结果：
l要注意使用正确类型的变量，错误更容易找到，代码运行速度也更快。
4Boolean 布尔型变量
1）使用一个布尔变量来保存值True或False。布尔变量作为 16 位（2 字节）数字存储，但它们只能是 True 或 False 。
2）将其他数值类型转换为布尔值时，0 将变为 False，所有其他值均变为 True。将布尔值转换为其他数据类型时，False 将变为 0，True 将变为 -1。
3) 布尔型变量默认初始值是FALSE
我们看下面代码：
Sub myNZC() '布尔型变量
Dimcontinue As Boolean
Ifcontinue = True Then
MsgBox"continue的值是TRUE"
Else
MsgBox"continue的值是FALSE"
EndIf
continue= True
Ifcontinue = True Then
MsgBox"continue的值是TRUE"
Else
MsgBox"continue的值是FALSE"
EndIf
End Sub
代码截图：
代码讲解：
第一行代码声明了一个名称为continue的布尔型变量。接下来，我们没有将continue初始化。通过一个MsgBox来显示它的值。接下来，我们将continue初始化为True。最后，我们使用MsgBox来显示这个值。
我们看代码的运行：
可以看出当没有初始化的时候，这个布尔变量的值为false。
对于数据类型，本讲只是讲解了一些常用的数据，其他的大家可以参考一下下面的表格：
今日内容回向：
1）什么是Integer整型变量？
2）什么是String 字符串型变量？
2）什么是Double 双精度浮点变量？
2）什么是Boolean布尔型变量？
本讲内容参考程序文件：工作簿05.xlsm
我20多年的VBA成果全在下面的资料中：
