1.3 数组
使用数组和对象时,也要声明,这里说下数组的声明:
' 确定范围的数组,可以存储b - a + 1个数,a、b为整数Dim 数组名称(a To b) As 数据类型Dim arr(1 TO 100) As Integer ' 表示arr可以存储100个整数arr(100) '表示arr中第100个数据' 不指定a,直接声明时,默认a为0Dim arr2(100) As Integer ' 表示arr可以存储101个整数,从0数arr2(100) '表示arr2中第101个数据' 多维数组Dim arr3(1 To 3,1 To 3,1 To 3) As Integer ' 定义了一个三维数组,可以存储3*3*3=27个整数' 动态数组,不确定数组大小时使用Dim arr4() As Integer ' 定义arr4为整形动态数组ReDim arr4(1 To v1) ' 设定arr4的大小,不能重新设定arr4的类型
除了用Dim做常规的数组的声明,还有下面这些声明数组的方式:
' 使用Array函数将已知的数据常量放到数组里Dim arr As Variant ' 定义arr为变体类型arr = Array(1, 1, 2, 3, 5, 8, 13, 21) ' 将整数存储到arr中,索引默认从0开始' 使用Split函数分隔字符串创建数组Dim arr2 As Variantarr2 = Split("hello, world", ", ") ' 按,分隔字符串 hello,world 并赋值给arr2' 使用Excel单元格区域创建数组' 这种方式创建的数组,索引默认从1开始Dim arr3 As Variantarr3 = Range("A1:C3").Value ' 将A1:C3中的数组存储到arr3中Range("A4:C6").Value= arr3 ' 将arr3中的数据写入到A4:C6中的区域
数组常用的函数
![93879b61a007070ada419c5bfe766fbe.png](https://i-blog.csdnimg.cn/blog_migrate/7e372ef52e5198d16ac00660e4119d1a.jpeg)
函数说明
UBound(Array arr,[Integer i]);UBound为函数名arr和i 为UBound的的参数,用中括号括起来的表示i为非必填参数arr和i 之前的Array,Integer表示对应参数的数据类型
VBA内置函数列表可查看微软帮助
神器放送
VBA编程神器 VBA代码助手 可以极大提高编程速度,降低编程门槛欢迎使用
私信回复 代码助手 即可获得
![e012e1d68f89af8e621f1ca2ae32dbd3.png](https://i-blog.csdnimg.cn/blog_migrate/7d95352ecf2d4bbbf2c7a19f4255730a.jpeg)
![d8515a9d0298147cea6242a80c5fb537.png](https://i-blog.csdnimg.cn/blog_migrate/7373561af383571ea8f92b2036615e24.jpeg)
![878ab5f482c17cb7eec52ad6e351faa8.png](https://i-blog.csdnimg.cn/blog_migrate/214d693ac5f444cdb8ce78199d502315.jpeg)