Excel Vba Dim Array With Variable Sized