如何使用宏VB替换和插入Excel单元格

Question

以下是我的宏功能的一部分。 用户可以输入＆输入（r，47）的像元值。 我想将输入的“＆”替换为“＆”，再加上“ amp;”。 （注意：在此编辑器中使用了复杂的方法“＆”和后跟“ amp;”作为放大器；”）

我尝试了替代，但是当我尝试保存宏时它给出了语法错误。

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

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

我尝试了以下方法。

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

Answer 1

1. 定义字符串时，应使用双引号。
2. 替代将无法正常工作。 这是一个工作表函数，而不是范围对象的方法。

3. 尝试使用VBA替换功能

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