vba里好用一点的数组

wanghan519

https://senipah.github.io/VBA-Better-Array/api/methods/

首先，这东西能干的，vba原来就能干。。。
但是，这东西能带来方便、节省时间和愉快的心情

个人感觉，平时写个vba，一半时间都在和vba里那个见鬼的数组较劲
从github上下载这个cls，导入xlsm，然后声明这个betterarray
就可以像js里的数组那样用了，甚至更多

可以像队列、堆栈那样，push、pop、unshift、shift，随时添加删除元素，包括二维数组
可以随便横竖切片，或者连接两个数组
可以直接读写csv文件、读写Range
自带去重、转置、最大最小值、排序、反转、查找等功能


总之，没什么新东西，只是可以像js数组那样简单的用，不用再和数组较劲，省心省力

ykcbf1100

你这个链接打不开。。。

wanghan519

ykcbf1100 发表于 2023-9-21 15:33
你这个链接打不开。。。

应该可以打开啊

cidanji

micch

这个对象，能像数组一样直接读入和输出吗？          arr=range("a1:d99").value:range("a1:d99").value=arr

wanghan519

micch 发表于 2023-9-21 16:17
这个对象，能像数组一样直接读入和输出吗？          arr=range("a1:d99").value:range("a1:d99").value=ar ...

可以的，刚试了一下读写Range没问题

1. arr.FromExcelRange Range("A2:A12")
   
2. arr.ToExcelRange Range("B2")

复制代码

或者

1. arr.Items=range("a1:d99").value
   
2. range("a1:d99").value=arr.Items

复制代码

现在发现的不方便的地方是，concat、splice之类的接受数组为参数的方法，只支持variant数组，字符串数组不行，可以转，但不太方便，其他的都很方便

wanghan519

micch 发表于 2023-9-21 16:17
这个对象，能像数组一样直接读入和输出吗？          arr=range("a1:d99").value:range("a1:d99").value=ar ...

比如隔壁这个去重的帖子，最不方便的地方是split切出来的是字符串数组，目前这库只支持variant数组（可能是我不会用），需要转一下，但剩下的，展平、去重、写入Range很方便，写入只需要指定B2会自动展开

micch

方法太多，想搞懂还真不容易

不过需要某个功能的时候单独用一下也是挺好的。

lss001

wanghan519 发表于 2023-9-21 16:42
比如隔壁这个去重的帖子，最不方便的地方是split切出来的是字符串数组，目前这库只支持variant数组（可能 ...

请楼主举例说明一下数组排序的用法！

wanghan519

lss001 发表于 2023-9-21 18:13
请楼主举例说明一下数组排序的用法！

比如隔壁这个去重，切成数组后排序再合并成文本，然后unique去重写入B2