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

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

---

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

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!

---

如A1：A100

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

---