Excel Vba Set Range To Array Definition