從VBA集合中獲得獨特的價值

Question

我有一個帶有數組的集合。 鍵是不同的，但是值是重復的。我想從這個集合中獲得唯一的值

這是樣本

Dim MyCollection As New Collection


MyCollection.Add Array(A1,txt),A1
MyCollection.Add Array(A2,txt),A2
MyCollection.Add Array(A3,txt),A3
MyCollection.Add Array(A4,txt),A4

MyCollection.Add Array(A5,num),A5
MyCollection.Add Array(A6,num),A6
MyCollection.Add Array(A7,num),A7
MyCollection.Add Array(A8,nu2),A8

MyCollection.Add Array(B1,nu2),B1
MyCollection.Add Array(B2,nu2),B2
MyCollection.Add Array(B3,txt2),B3
MyCollection.Add Array(B4,txt2),B4
MyCollection.Add Array(B5,txt2),B5

我想獲取'txt', 'num' , 'nu2' and 'txt2'單個實例

結果可以是包含'txt', 'num' , 'nu2' and 'txt2'的字符串數組

Answer 1

您可以使用以下技巧將您的收藏集轉移到字典中： vba：從數組中獲取唯一值

這將刪除重復項。