VBA的数据类型、变量、赋值及参与计算

点击上面"Excel公式与技巧"篮字关注公众号

点击文章底部左下角"阅读原文"即可学习视频
学习建议【看千遍不如操作练习一遍】
微信号【duanzhenyun】加微信邀请进交流群

推荐学习120个技巧（包含常用技巧，条件格式，数据透视表及打印技巧），超过6个小时视频讲解，点击文章底部阅读原文即可购买学习。

1、VBA数据类型
布尔型（Boolean）
字节型（Byte）
整数型（Integer）
长整数型（Long）
单精度浮点型（Single）
双精度浮点型（Double）
货币型（Currency）
小数型（Decimal）
日期型（Date）
字符串型（String）
变体型（Variant）
对象型（Object）

2、VBA的变量（声明变量语句）
①、Dim  变量名  As  数据类型
②、Private  变量名  As  数据类型
③、Public  变量名  As  数据类型
④、Static  变量名  As  数据类型
注：变量名必须以字母或者汉字开头，不能包含空格、。、！、@、&、$和#这些特殊符号。
例：Dim test As String  '声明一个String数据类型的变量，名称为test

3、给变量赋值
①、给数据类型变量赋值
Dim test As String  '定义变量，声明一个String数据类型的变量，名称为test
test=666  '给变量test赋值666

②、给对象类型变量赋值
Dim shet As Worksheet  '定义一个工作表对象Shet
Set shet = Activesheet  '将活动工作表赋给变量shet

4、让变量中储存的数据参与计算
①、Sub test_数据变量计算()

Sub test_数据变量计算()

复制代码

Dim test As String '定义一个String数据类型的变量，名称为test

复制代码

test = 666 '将666赋值给名称test存储到String变量中

复制代码

Range("a1").Value = test '将String存储的数据写入活动工作表中的A1单元格中

复制代码

End Sub

复制代码

②、Sub test_对象变量计算()

Sub test_对象变量计算()

复制代码

Dim sht As Worksheet '定义一个工作表对象sht

复制代码

Set sht = ActiveSheet '将活动工作表赋给变量sht

复制代码

sht.Range("a3").Value = ("我在Excel公式与技巧公众号学习Excel") '在变量sht存储的工作表A3单元格中输入我在Excel公式与技巧公众号学习Excel

复制代码

End Sub

复制代码

更多Excel函数使用及技巧可以打开公众号，点开历史文章，然后在顶部搜索技巧或者函数即可，如不会可点击红色字体跳转连接看操作步骤，如何利用公众号搜索功能查资料

长按下面二维码；点击上面"识别图中二维码"然后再点关注，可以收到更多Excel教程；或者加入QQ交流群657629885或者加我微信邀请进微信群duanzhenyun，让我们一起学习Excel函数公式与技巧应用。
喜欢本文，请点这里