EXCEL高手请进，关于宏命令的问题，求救啊~~

Question

请看代码 Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 5 Then
If IsError(Evaluate(Target.Value)) = False Then
Cells(Target.Row, 6) = Evaluate(Target.Value)
End If
End If
End Sub

这段代码是用来计算的

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 5 Then
Target.NumberFormat = "@"
End If
End Sub

这段代码是啥意思？？
我的EXCEL用了这两段代码的时候，我在用查找和替换的功能的时候，撤销键和前进键 变成阴影了，用不了了？ 如果我替换错误，无法回到替换之前的状态，有没有高手知道这是为什么啊？求指教

Answer 1

因为替换会修改单元格内容
修改单元格内容会触发第一段代码
而VBA所做的修改无法撤消

你可以在替换前按ALT+F11,然后单击工具栏上的暂停按钮,然后再替换.
替换完后再次单击该按钮恢复代码运行.

追问

有没有更加简便的方法，我工作量比较大，查找替换比较多，每个都这么搞，很麻烦啊

追答

要么舍弃宏,要么舍弃vba.
2者只能2选1.