Excel vba cell on change

' In your Worksheet code:
Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Target.Worksheet.Range("A1")) Is Nothing Then 
    	Application.EnableEvents = False
    	'  Do your stuff
    Application.EnableEvents = True
    End If
End Sub

Similar codes

5 votes328 views1 answer
Excel vba low word from Long Integer
VBA
0 vote289 views1 answer
Switch pictures with buttons vb.net
VBA
0 vote279 views1 answer
Open application from vbnet
VBA
0 vote287 views1 answer
Vbnet line graph smooth lines
VBA
0 vote317 views1 answer
Method showalldata of object _worksheet failed vba
VBA
0 vote293 views1 answer
String contins in vba
VBA
0 vote313 views1 answer
Vba find last column in a row with data
VBA
0 vote282 views1 answer
Vba add month to date
VBA
1 vote340 views1 answer
Excel vba convert text YYYYMMDD to date
VBA
1 vote246 views1 answer
Vba exit do while
VBA