vba中数组用法

一：简单介绍

定义方式
dim  arr11 (5)
dim  arr12 (0 to 5 )
dim  arr13 (1 to 5)

dim arr21(1,5)
dim arr22(0 to 1 ,0 to 5)
dim arr22(1 to 1 ,1 to 5)

dim arr3()

静态数组
dim  arr51(5)

动态数组
dim arr61()
redim arr61(13)
redim arr61(20)
redim arr61(j)
redim arr61(1 to k)

dim arr71()
redim preserve  arr71( 1 to 10)

dim arr81()
arr81(0)=1
redim preserve  arr81( 1 to 10)

dim arr91()
arr91(1)=2
redim preserve  arr91( 1 to 10)
 

数组的定义方式的差别
Dim arr1 As Range         '定义为excel对象，arr1是对象名。range是EXCEL的对象，cells也是
                                        '并且这样的数组一定是 2维数组
Dim arr2                          '定义变量，arr2是变量名
                                        '变量最灵活，变量可以被 对象赋值，也可以被数组直接赋值  
Dim arr3()                        '定义为数组，arr3是数组名
                                        '而且这是动态数组，index默认了从0开始
                                        ' 动态数组才配合用 redim ,静态数组不需要
                                        ' 动态数组只能改变最后1个维度
dim  arr4(5)                      '这是静态数组，静态数组不需要redim

数组定义与数组个数
dim arr1(5)                                        'index是 0,1,2,3,4,5，共6个index
dim arr1(1 to 5)                                 'index是 1,2,3,4,5，共5个index
option base 2   dim arr1(5)               'index是 2,3,4,5，共4个index
 

什么时候用redim 和 preserve
数组先被定义为了 动态数组 dim arr1()
后面可以重新定义 redim arr1(k)
可以进行多次redim
如果下次redim想 保留之前 arr1里的数据，则需要写 redim preserve arr1(k) 
容易出错的地方 redim preserve arr1(1 to k）往往会报错，越界，因为之前index从0开始，无法匹配preserve

定义方式
dim  arr11 (5)
dim  arr12 (0 to 5 )
dim  arr13 (1 to 5)

dim arr21(1,5)
dim arr22(0 to 1 ,0 to 5)
dim arr22(1 to 1 ,1 to 5)

dim arr3()

静态数组
dim  arr51(5)

动态数组
dim arr61()
redim arr61(13)
redim arr61(20)
redim arr61(j)
redim arr61(1 to k)

dim arr71()
redim preserve  arr71( 1 to 10)

dim arr81()
arr81(0)=1
redim preserve  arr81( 1 to 10)

dim arr91()
arr91(1)=2
redim preserve  arr91( 1 to 10)
 

数组的定义方式的差别
Dim arr1 As Range         '定义为excel对象，arr1是对象名。range是EXCEL的对象，cells也是
                                        '并且这样的数组一定是 2维数组
Dim arr2                          '定义变量，arr2是变量名
                                        '变量最灵活，变量可以被 对象赋值，也可以被数组直接赋值  
Dim arr3()                        '定义为数组，arr3是数组名
                                        '而且这是动态数组，index默认了从0开始
                                        ' 动态数组才配合用 redim ,静态数组不需要
                                        ' 动态数组只能改变最后1个维度
dim  arr4(5)                      '这是静态数组，静态数组不需要redim
 

数组定义与数组个数
dim arr1(5)                                        'index是 0,1,