Excel Vba Replace Substring Java