单击单元格时显示公式vba

所以我有这样的想法：

     A     B     C
1    11    12    13
2    10    20    15
3    1     -8    -2

因此，

A3

、

B3

和

C3

是通过将

A1

减去

A2

来生成的

如果查看工作表的顶部，会有一个长条，当您单击某个单元格时，它会显示该单元格的公式。如果您手动填写表格，您可以在该条中键入类似于

=A1-A2

的内容，它将为您填写

A3

现在，因为我的公式实际上在代码中，例如，当我单击

A3

时，条形图只显示

1

，而不是

=A1-A2

---

如何使公式显示在条形图中？

我猜现在，您正在沿以下行填充单元格：

Range("A3").Value = Range("A1").Value - Range("A2").Value

因此，要解决您的问题，请使用以下方法：

Range("A3").FormulaLocal = "=SUM(A1;A2)"

---

根据您的要求使用.formula

Worksheets("Sheet1").Range("A3").Formula = "=A1-A2"

---

与使用VBA在特定单元格内生成值不同，您可以使用VBA在单元格内动态编写公式，如果您根本没有使用VBA，则可以这样做。但是，除了向您显示公式外，它还会在数据更改时自动更新（而从宏转储的值不会更新）。这可能不是你想要的。