在Excel中使用宏格式化文本

Question

所以我有一堆字段名称需要在同一个工作表中重新格式化。

 ActiveCell.Offset(-11, -9).Range("A1").Select
ActiveCell.FormulaR1C1 = "EndDate"
ActiveCell.Offset(11, 9).Range("A1").Select
ActiveCell.FormulaR1C1 = """EndDate"": {"
ActiveCell.Offset(1, 1).Range("A1").Select
ActiveCell.FormulaR1C1 = """type"": ""string"""
ActiveCell.Offset(1, -1).Range("A1").Select

End Sub

有一个我称之为＆＃34;结束日期＆＃34;并使用此代码正确地重新格式化，但代码不会将输出定制到特定字段。我使用宏录制器来创建相对引用。我尝试使用公式但不能，因为我需要围绕字段名称引用。 Excel不允许=＆＃34; A6＆＃34; .....