数组

一维数组
dim arr（0 to 49） as string = dim arr（49） as string
都是从0开始，一共50个数组

dim arr（1 to 50） as string
这样就可以数组从1开始了、

二维数组
dim arr（2，19）
这就是二位数组了

动态数组
当我不知道我的数组要设置多大的时候，怎么办

• 我先来dim arr（） as string，n as long

然后我看看多少个单元格

• n=application.worksheetfunction.counta（rang（A:A））

然后根据统计出来的结果n，定义大小

• redim arr（1 to n） an string

dim函数声明变量额时候，括号里面不可以是变量，所以必须用redim才可以

其他方式
一、arr=array（1,2,3）
当用array函数定义数组的时候，必须dim arr as variant

二、split（“1&2&3&”，“&”）
当用split函数定义数组的时候，必须dim arr as variant
split后面的那个，意思什么作为分割号

三、arr=range（“A1：C3”）.value
range(“E1:G3”).value=arr
当用range函数定义数组的时候，必须dim arr as variant
就是把数组写到另外的一部分相同的区域内

四、
ubound（arr）最大索引号
lbound（arr）最小索引号
ubound（arr）- lbound（arr） +1一唯数组求个数
ubound（arr，1）- lbound（arr，1） +1二唯数组求个数（限定维数）

五、join 用一个东西，给数组连接成一个字符串
arr=array（1,2,3）
tet=join（arr，“@”）
msgbox txt 为 1@2@3@

六、range就是把数组写进去excel里面去

• 一维

range（“A1：A9”）.value=application.worksheetfunction.transpose(arr)
transpose变成列，去掉这个是行

• 二维

range（‘’A1：B3“”）=ARR
范围必须一样才能写进去