Excel Vba Remove Empty Array Elements