Vba Create Array Based Representation