如何在vba中更改工作表更改事件中的单元格值

Question

实际上使用下面的代码是不可能的，因为我们正在Worksheet_Change中进行更改

Private Sub Worksheet_Change(ByVal Target As Range) Target.Value = "test" End Sub

活动会无限循环

我必须只在这次事件中改变目标

你有办法解决这个问题吗？

Answer 1

使用

Application.EnableEvents = False

阻止 Excel 识别更改事件。

Private Sub Worksheet_Change(ByVal Target As Range)

Application.EnableEvents = False
Target.Value = "test"
Application.EnableEvents = True

End Sub