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

0 vote271 views1 answer
Vbs write file
VBA
0 vote278 views1 answer
Vbnet access System.InvalidOperationException: 'Update requires a valid UpdateCommand when passed DataRow collection with modified rows.'
VBA
4 votes278 views2 answers
Vba create folder if not exist
VBA
0 vote306 views1 answer
If statement vdhl
VBA
0 vote294 views1 answer
Iterate all file in a folder vba
VBA
0 vote265 views1 answer
Vba DisplayGridlines
VBA
0 vote279 views1 answer
Get current year vb
VBA
1 vote272 views2 answers
Vba string to date
VBA
1 vote273 views1 answer
How to INPUT text in shape with enter and spacein vba
VBA
0 vote256 views1 answer
Vbide vbproject reference
VBA