Передайте строку в msoChartFieldFormula в Excel VBA

Я пытаюсь динамически установить datalabel в столбчатой ​​диаграмме. Это работает

.DataLabels(1).Format.TextFrame2.TextRange.InsertChartField msoChartFieldFormula, "=""This Works""", 1 

Но передача строки для воссоздания «=» «This Works» «" с указанным параметром имеет недопустимое значение. Не так много на msoChartFieldFormula любая помощь приветствуется. Я знаю, что могу установить это в ячейку, но для создания сотен диаграмм это слишком много, чтобы сделать это вручную.

Давайте будем гением компьютера.