Excel Vba Range Sort Function In R Return