Excel Vba Create Array And Object Iteration