大家好，欢迎来到IT知识分享网。
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为0 Dim 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 Variant arr2 = Split("hello, world", ", ") ' 按,分隔字符串 hello,world 并赋值给arr2 ' 使用Excel单元格区域创建数组 ' 这种方式创建的数组，索引默认从1开始 Dim arr3 As Variant arr3 = Range("A1:C3").Value ' 将A1:C3中的数组存储到arr3中 Range("A4:C6").Value= arr3 ' 将arr3中的数据写入到A4:C6中的区域 数组常用的函数
函数说明
UBound(Array arr,[Integer i]); UBound为函数名 arr和i 为UBound的的参数，用中括号括起来的表示i为非必填参数 arr和i 之前的Array，Integer表示对应参数的数据类型 VBA内置函数列表可查看微软帮助
神器放送
VBA编程神器 VBA代码助手 可以极大提高编程速度，降低编程门槛欢迎使用
私信回复 代码助手 即可获得
免责声明：本站所有文章内容,图片，视频等均是来源于用户投稿和互联网及文摘转载整编而成，不代表本站观点，不承担相关法律责任。其著作权各归其原作者或其出版社所有。如发现本站有涉嫌抄袭侵权/违法违规的内容,侵犯到您的权益，请在线联系站长,一经查实,本站将立刻删除。 本文来自网络,若有侵权，请联系删除，如若转载，请注明出处：https://yundeesoft.com/166214.html
