Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Enable Events

Private Sub Worksheet_Change(ByVal Target As Range)            Application.EnableEvents = False            Range("A1").Value = 100            Application.EnableEvents = True      End Sub