Filter函数实现数组筛选:
数组的筛选就是根据一定的条件,从数组中筛选符合条件的值,组成一个新的数组,实现数组筛选的VBA函数是:
Filter函数
用法:Filter(数组, 筛选的字符, 是否包含)
Sub DD() arr = Array("ABC", "A", "D", "CA", "ER") arr1 = VBA.Filter(arr, "A", True) '筛选所有含A的数值组成一个新数组 arr2 = VBA.Filter(arr, "A", False) '筛选所有不含A的数值组成一个新数组 MsgBox Join(arr2, ",") '查看筛选的结果 End Sub
遗憾的是函数只能进行模糊筛选,不能精确匹配。
|