vba - 替换功能，如何替换并非所有已建立的字符串？

我从 excel 文件创建 XML 文件。我将一个单元格中的字符串保存在变量 sObserved 中。当在该字符串中我有一个字符 "&" 时，它应该被替换为 "&" ，当我有一个字符 ";" 时，它应该被替换为 ";" 。
我用这个函数替换，这是我的代码:

        sObserved = Replace(sObserved, "&", "&amp;")
        sObserved = Replace(sObserved, ";", "&#59;")

但这不能很好地工作，因为当它替换 "&" 上的 "&" 时，会出现 ";" 并且接下来的操作会将其更改为 "&amp;"如果我要更改订单，它也会出错，因为然后将替换 "&#59" 中的“&”符号。

有没有可能像我想要的那样更换它？我会很感激任何想法，因为我坚持在这里。

最佳答案

试试这个:

sObserved = Replace(sObserved, "&", "&amp;")
sObserved = Replace(sObserved, ";", "&#59;")
sObserved = Replace(sObserved, "&amp&#59;", "&amp;")

关于vba - 替换功能，如何替换并非所有已建立的字符串？，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/34308367/