數(shù)組的篩選就是根據(jù)一定的條件,從數(shù)組中篩選符合條件的值,組成一個新的數(shù)組，實現(xiàn)數(shù)組篩選的VBA函數(shù)是：

         Filter函數(shù)

  用法：Filter(數(shù)組, 篩選的字符,  是否包含) 

Sub DD()
     arr = Array("ABC", "A", "D", "CA", "ER")
     arr1 = VBA.Filter(arr, "A", True) '篩選所有含A的數(shù)值組成一個新數(shù)組
     arr2 = VBA.Filter(arr, "A", False) '篩選所有不含A的數(shù)值組成一個新數(shù)組
     MsgBox Join(arr2, ",") '查看篩選的結(jié)果
End Sub

遺憾的是函數(shù)只能進行模糊篩選，不能精確匹配。