VBA学习笔记（1）变量与常量

一、数据类型

数据类型	代码	声明字符	范围描述
整数型	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声明	在模块的第一个过程前声明