Excel Vba Create Array Of Numbers