数组只能用循环或者遍历了，如果是excel中的，还可以用worksheetfunction.match判断元素是否存在，可以考虑把数组转变成字典，字典对于这个问题处理起来就很轻松了。
f = filter(arr,"ONE",true)if msgbox (ubound(f)) = -1 then "ONE不存在于数组arr中"
调试中的监视
