如何从单元格中删除公式并替换为 VBA 中的数字？

Question

假设我有一个单元格，C1。 C1 中的公式是 =A1*B1，等于 2。如何删除公式并在计算后仅将其替换为结果数字？ 我试过这个：

Dim x As Long

x = .Range("C1").Value
.Range("C1").Value = x

这不起作用，因为 x 试图存储公式，而不是计算所述公式。

Answer 1

如果您想要计算结果，只需使用

With .Range("C1")
    .Value2 = .Value2
End With

如果你想要公式使用.Formula