VBA抢答：筛选工作表数组的自定义函数

兰色幻想

<p>题目：</p><p>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 要求编写自定义函数Myarr，可以根据设置的条件筛选并返回符合条件的数组。即 Myarr( 数组，"条件") 条件可以用&gt;、&lt;、&gt;=、&lt;=符号进行条件的设置。</p><p>&nbsp;&nbsp; 有一工作表数组{12,2,4,6,11,14,17}如果用自定义函数myarr</p><p>&nbsp; =Myarr({12,2,4,6,11,14,17},"&gt;10") </p><p>&nbsp;&nbsp;&nbsp; 可以返回数组 </p><p>&nbsp;&nbsp;&nbsp; {12,11,14,17}</p><p>&nbsp; =Myarr({12,2,4,6,11,14,17},"&lt;10") </p><p>&nbsp;&nbsp; 返回数组：</p><p>&nbsp;&nbsp; {1,2,4,9,6}</p><p>前三个分别奖励15，10，8个金币其他每个正确答案奖励5个金币，发完为止,<font color="#e70808">请用回复可见方式回答</font></p>

[此贴子已经被作者于2010-11-27 13:23:54编辑过]

snrvgbb

<p>不是太理解题意，试了一下请指正</p><p>

游客，如果您要查看本帖隐藏内容请回复

</p>

吕?布

游客，如果您要查看本帖隐藏内容请回复

兰色幻想

楼上两位答案正确

liyh67

游客，如果您要查看本帖隐藏内容请回复

那么的帅

游客，如果您要查看本帖隐藏内容请回复

wayy

学习一下。

EZD

只有看的份[em102]

liyh67

学习了其他几位的方法，我的方法太笨了[em06]

wbzxz

<div>虽然很繁琐，但是总是经过自己思考做出来的，自己写了一遍，也就学会了某些知识，兰版如果有时间的话，给指点一下不足吧，呵呵。</div>

游客，如果您要查看本帖隐藏内容请回复

</div>

[此贴子已经被作者于2010-11-28 23:04:44编辑过]