Code:
changedXml = Replace(strXml, "</graphic>" & Chr(11) & "</figure>" & Chr(11) & "</foldout>", "reproductionWidth=*+1")
works to change the string, but whether it will change the text in your document rather depends on what you do with changedXml subsequently.