Hi Greg,

Thanks for your quickly reply!
It seems that you have found the workaround, If I misunderstood, please let
me know.
BTW:
I think you may try to disable the event temporarily when you did not want
the event fire.
Sub Test()
Application.EnableEvents = False
Range("D1").Text = "Test"
Application.EnableEvents = True
End Sub

Best regards,

Peter Huang

Microsoft Online Community Support
==================================================
When responding to posts, please "Reply to Group" via your newsreader so
that others may learn and benefit from your issue.
==================================================
This posting is provided "AS IS" with no warranties, and confers no rights.