从包含公式的单元格中提取值并粘贴到另一个单元格中

Question

我尝试使用以下代码从 Sheet1 中的 AI31 单元格中提取值（AI31 中有公式）并将值粘贴到 Sheet3 中的 C2

Sheets("Sheet1").Evaluate(Range("AI31").Formula).Copy Destination:=Sheets("Sheet3").Range("C2")

然而它不起作用(VBA)

如有任何帮助，我们将不胜感激

Answer 1

您的代码非常复杂。

Worksheets("Sheet3").Range("C2").Value = Worksheets("Sheet1").Range("AL31").Value

由于 .Value 是 Range 对象的默认 属性，您可以省略它，不过，我喜欢在我的宏中键入它。