Excel Vba Array Remove Empty Spaces