Vba Create Array And Hashing