Excel Vba Get Max Value From Hashmap