Excel Vba Replace Substring Python