将公式单元格转换为数据

将公式单元格转换为数据

我有一小段代码,可以将工作表中包含公式的所有单元格转换为数据。它不会更改数据单元格或空单元格:

Sub ConvertFormulasToData()
    With ActiveSheet.UsedRange
        .Cells.Value = .Cells.Value
    End With
End Sub

它工作得很好。我尝试通过删除以下内容来简化此过程.Value

Sub ConvertFormulasToData2()
    With ActiveSheet.UsedRange
        .Cells = .Cells
    End With
End Sub

这根本不起作用。它似乎清除了工作表中的所有单元格。

在我看来,这两个程序应该工作相同,因为的默认属性CellsValue

有人能解释为什么第二个子程序不起作用吗?

相关内容