Question

VBA怎样去掉工作表里的公式

VBA怎样去掉工作表里的公式

Answer 1

我写了一个，请参考。
思路就是：对所选中的区域，逐单元格检查其中是不是公式，是的话就直接用单元格值重新填写。

Sub Macro1()
Dim m As Range, tmpCha As String
On Error Resume Next
For Each m In Selection
tmpCha = Left(m.Formula, 1)
If tmpCha = "=" Then m.Value = m.Value
Next m
On Error GoTo 0
End Sub

注意：这个宏是对所选中的区域进行处理！

GoodLuck!

Answer 2

如A1：A100

Range("A1:A100")=Range("A1:A100").value