如何更换&；在excel单元格中使用宏vb

下面是我的宏函数的一部分。（r，47）的单元格值可能已由用户输入（&C）。我想将输入的“&”替换为“&”，后跟“amp；”。（注意：在这个编辑器中，使用“amp；”后跟“amp；”的卷积方法作为amp；被删除。）

我尝试了替换，但当我试图保存宏时，它给出了语法错误

目前，我的宏函数中有此语句

Print #fnum, "<College><School>" & Cells(r, 47) & "</School></College>" 

Print#fnum，“&单元格（r，47）&”

我试了下面的那个

Print #fnum, "<College><School>" & Cells(r, 47).Substitute('&','&amp;') & "</School></College>"

Print#fnum，“&单元格（r，47）。替换（'&'，'amp；'）&”

定义字符串时应使用双引号

替换无效。它是一个工作表函数，而不是范围对象的方法

请尝试VBA替换函数

Print#fnum，”&Replace（单元格（r，47），“&”、“&”）和“

它只是在“Print#fnum”、“Replace（Cells（r，47）”、“&”、“amp；”之后漏掉了一个“&”字