Excel Vba Set Range With Variables In Math