Vba Create Array Based On Cell Value Definition