excel - Excel vba更改形状公式而不选择形状

Question

我正在尝试更改形状内的公式而不选择它，但不断收到运行时错误。

以下是我迄今为止尝试过的一些代码：

    Sheets("Quote").Shapes.Range(Array("Rectangle 87")).Formula = " =CommAnnualOutput"
    Sheets("Quote").Shapes("Rectangle 87").Formula = " =CommAnnualOutput"
    Sheets("Quote").Shapes("Rectangle 87").DrawingObjects.Formula = " =CommAnnualOutput"

这些似乎都不起作用。有没有办法在不先选择形状的情况下更改公式？

Answer 1

请在此处找到您问题的答案：

使用 Excel 形状链接单元格

祝你好运

Answer 2

您上次尝试错过了两个字符。那将是

Sheets("Quote").Shapes("Rectangle 87").DrawingObject.Formula = "=CommAnnualOutput"