Excel Create Array Based On Cell Value In Vba