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

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对象的默认属性，你可以省略它，但是，我喜欢在我的宏中键入它。