 截取VBA数组（index函数） |
index函数：'调用该工作表函数可以把二维数组的某一列或某一行截取出来，构成一个新的数组。
' Application.Index(二维数组,,列数)) 返回二维数组
' Application.Index(二维数组,行数,0)) 返回一维数组
(12/17/2011 09:45:44,106) [查看全文] |
| 对VBA数组的筛选（Filter函数） |
Filter函数：'按条件筛选符合条件的值组成一个新的数组
'Filter(数组,筛选条件,是/否)
'注：如果是（true）则返回包含的数组，如果否则返回非
(12/17/2011 09:45:07,62) [查看全文] |
| split函数在数组中的应用 |
split函数'按分隔符把字符串截取成VBA数组,该数组是一维数组，编号从0开始
'split(字符串,分隔符)
Sub t1()
(12/17/2011 09:44:42,25) [查看全文] |
| 在数组里查找（VBA） |
在数组里查找
Sub s2()
Dim arr
On Er
(12/17/2011 09:44:29,82) [查看全文] |
| VBA数组中符合条件个数统计 |
符合条件个数统计
Sub s1()
Dim arr1, arr2, arr3(0 To 10), sr, x
(12/17/2011 09:44:13,126) [查看全文] |
| VBA数值的最大值和最小值 |
数值的最值
Sub s()
Dim arr1()
arr1 = Array(1, 12, 4, 5, 19)
(12/17/2011 09:43:27,59) [查看全文] |
| excel vba模糊匹配 |
答excel vba模糊匹配可以用用like运算符，例：
x like "*A*" 包含A
x like "[0~9]" 0至9之间的任意数字
x like "##" 任意两位数
(12/16/2011 19:50:04,87) [查看全文] |
| 按编号(标)写入和读取VBA数组 |
按编号(标)写入和读取
Sub t1() '写入一维数组
Dim x As Integer
Dim arr(1 To 10)
(12/16/2011 10:23:14,20) [查看全文] |
| 一维数组存入单元格 |
Sub d3() '一维数组存入单元格
Dim arr, arr1(1 To 5)
Dim x As Integer
(12/16/2011 10:23:06,34) [查看全文] |
| VBA数组读取存入单元格中 |
读取存入单元格中
Sub d2() '二维数组存入单元格
(12/16/2011 10:22:16,46) [查看全文] |
 在内存中读取VBA数组 |
在内存中读取
'在内存中读取后用于继续运算，直接用下面的格式
(12/16/2011 10:21:50,50) [查看全文] |
| 动态数组的动态扩充：ReDim Preserve |
动态数组的动态扩充
'如果一个数组无法计算出总的大小，而在一些特殊情况下又不允许有空位。这时我们就需要用动态的导入方法
'
'ReDim Preserve 可以声明一个动态大小的数组，而且可以保留原
(12/16/2011 10:21:26,134) [查看全文] |
| 数组的大小Lbound和Ubound使用 |
数组的大小
'数组是用编号排序的，那么如何获得一个数组的大小呢
'Lbound(数组) 可以获取数组的最小下标(编号)
'Ubound(数组) 可以获取数组的最大上标(编号)
'Ubound(数组,1) 可以获得数组的行方面(第1维)最大上标
'Ubound(数组,2) 可以获得数组的列方
(12/16/2011 10:20:34,54) [查看全文] |
| 什么是VBA常量数组、静态数组、动态数组？ |
什么是VBA数组呢？
'VBA数组就是储存一组数据的数据空间?数据类型可以数字,可以是文本,可以是对象,也可以是VBA数组.
'2 VBA数组存在形态
(12/16/2011 10:19:50,55) [查看全文] |
| 动态数组的数据写入 |
动态数组
Sub t3()
Dim arr()
(12/16/2011 10:19:34,12) [查看全文] |
|
|
