Excel Vba Get Maximum Value From Array To Hashmap