Excel Vba String Variable Maximum Ira