如何解决2D阵列过滤器-VBA NO EXCEL
在几年前的Filtering 2D Arrays in Excel VBA中,有人提出了用于2D数组过滤器的函数,但是使用了excel函数:
If Evaluate(TmpVal & FindStr) Then Dic.Add i,""
现在,评估我的应用程序Autodesk在VBA上不可用。 请有人可以建议我如何替代它? 我绑定了两个对象属性的二维数组。 有时对象可能具有相同的属性,请参见下面的示例
对象1层“ GREEN”长度为100
对象2层“ GREEN”长度为100
对象3层“ GREEN”长度为150
对象4层“蓝色”长度200
计算结果:
蓝色层长度200计数1
绿色层长度100计数2
绿色层长度150计数1
所以我的范围是拥有一个具有上述结果的二维数组。 不幸的是,过滤器功能仅适用于一维数组。 谢谢
解决方法
一个古老的问题,但是stdLambda
是Evaluate()
方法的一个很好的选择
for i = lbound(v,1) to ubound(v,1)
if stdLambda.Create("$1 = """ & sValueName & """")(v(i,iField)) then Dic.Add i,""
next
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。