Excel Vba Create Array And Add Values To Hashmap