Class06. 数组

定义

下面是几种常见定义数组的方法。

' 定义一个一维数组，数据类型为Variant，长度从0到5，实际控件有六个，长度为5
Dim arr(5) as String
' 定义一个一维数组，数据类型为Variant，长度从1到5，实际控件有六个，长度为5
Dim arr(1 to 5) as String
' 可以省略As后面部分，等于 Dim arr2 () as Variant
Dim arr(5)
' 一维数组，下标从0开始
arr2 = Array("你好", "世界")
' 一维数组，下标从0开始
arr3 = [{1,2,3,4}]

计算数组长度

'数组下限：
LBOUND(数组）  '结果：一般为0
'数组上限：
UBOUND(数组）
'数组长度：
UBOUND(数组）-LBOUND(数组）+1

动态分配数组

建议打断点查看数组容量的变化。

Sub test()v_count = ActiveSheet.UsedRange.Rows.CountReDim arr(1 To v_count) As Stringarr(1) = 1arr(v_count) = v_count' 二次扩充数组容量ReDim Preserve arr(1 To 2 * v_count)arr(2 * v_count) = 2 * v_countFor Each v_item In arrIf v_item <> "" ThenMsgBox (v_item)End IfNextEnd Sub

ReDim 后面如果不加 Preserve，结果会有所不同。

从区域中（Range）获取

' 可以直接将工作表中A1:E1区间内的二维表的数据写到数组中。
arr = Range("A1:E100")

Split 函数

Split 函数可以将字符串按某一个特定的分隔符分割成数组。

Sub test()v_Str = "A-BC-d-E-"arr = Split(v_Str, "-")MsgBox (arr(2))
End Sub

[“A”,“BC”,“d”,“E”,""]

Join 函数

Join 函数和 Split 函数相反，可以将数组按特定的字符串连接起来。

arr2 = Array("你好", "世界")
v_str = Join(arr2,"-")

“你好-世界”

VBA实战(6) - 数组相关推荐

go反射实战之数组的查找Find过滤Filter函数实现
go反射实战之数组的查找过滤函数实现在使用的go的时候,如果想要在数组中查找一个元素每次都要写一个循环来查找,过滤也是一样,没有一个能打的函数来帮助我们干这些事情,通过前面的学习,我们可以通过反射实 ...
VBA实战(11) - 工作表(Sheet) 操作汇总
Sheet 操作汇总一.读取所有的 Sheet 页二.获取一个 Sheet 页中有效的行数和列数三.添加 Sheet 页四.删除 Sheet 页五.设置 Sheet 页的背景色六.分级 ...
【VBA研究】数组的定义和使用
作者:iamlaosong 数组用起来很方便,尤其是利用循环可以大大简化代码量.用数组读取工作表内容,再进行各种处理,可以大大提高程序效率.在数组使用过程中不可避免的要碰到一些令人困惑的问题,下面就讨 ...
VBA实战(03) - Excel 对象
Class03. VBA - Excel 对象 1. Excel 的结构 2. 打开和关闭Excel 2.1. 打开Excel文件 2.2. 关闭Excel文件 2.3. 保存Excel文件 3. 操 ...
LeetCode实战：数组中的第K个最大元素
背景为什么你要加入一个技术团队? 如何加入 LSGO 软件技术团队? 我是如何组织"算法刻意练习活动"的? 为什么要求团队的学生们写技术Blog 题目英文 Find the kt ...
vba二维数组初始化_将工作表数据写入VBA数组
大家好,最近推出的内容是"VBA信息获取与处理"中的部分内容,这套教程面向中高级人员,涉及范围更广,实用性更强,现在的内容是第四个专题"EXCEL工作表数据的读取.回填和 ...
vba 数组赋值_VBA数组与字典解决方案第18讲：VBA中静态数组的定义及创建
大家好,我们今日继续讲解VBA数组与字典解决方案,今日讲解第18讲:VBA数组如何定义,又该如何创建呢? 从这一讲开始,我们开始进入VBA数组阶段,VBA数组和工作表数组有着不同的意义,在很大程度上, ...
VBA实战技巧精粹012：查找指定目录下的指定文件及Dir函数用法
问题:有处理学生评语,限于网络条件,往往学生提交的都是单个文件,这就需要将其一一提取出来,然后进行判断.导出等操作,但首先要解决的就是查找所有文件如何操作,这里需要用到Dir函数,当然创建一个文件搜索 ...
大数据分析的好帮手 Excel函数应用的顶级实战 Excel数据分析应用+VBA实战 24G课程
===============课程目录=============== ├<第二章函数应用篇 01-30> │ ├2-01 公式求值和F9帮您解析函数的运算逻辑和顺序 │ ├2-02 ...
Go语言实战之数组的内部实现和基础功能
写在前面嗯,学习GO,所以有了这篇文章博文内容为<GO语言实战>读书笔记之一主要涉及数组相关知识世上除了爹娘,再没有人是理所应当对你好的. --烽火戏诸侯<剑来> 数组 ...

VBA实战(6) - 数组

Class06. 数组

定义

计算数组长度

动态分配数组

从区域中（Range）获取

Split 函数

Join 函数

VBA实战(6) - 数组相关推荐

最新文章

热门文章