把公式放在excel表格里

我想用VBA填充Excel图表上的文本框。 我试过这个：

ActiveSheet.ChartObjects("Chart 1").Chart.Shapes(1).Formula = "Sheet1!A1" 

它不起作用，但是这样做：

  ActiveSheet.ChartObjects("Chart 1").Chart.Shapes(1).Select Selection.Formula = "=Sheet1!A1" 

有可能我需要把Shapes(1)和.Formula ，但我找不到它。 有什么build议么？

Answer 1

请注意，第二个公式（工作的公式）在工作表名称之前包含一个等号：

“工作表Sheet1 =！A1”

而第一个则不：

“工作表Sheet1！A1”