Excel Vba Create Array Of Unique Values In List