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 votes237 views1 answer
Excel vba tool to help with refactoring code
VBA
0 vote197 views1 answer
Vb.net round to 2 decimal places
VBA
1 vote238 views1 answer
Vba format string as cash
VBA
0 vote208 views2 answers
How to concatenate more than 40 lines in vba
VBA
0 vote251 views1 answer
Vba change active sheet
VBA
0 vote208 views1 answer
Vba loop through table
VBA
0 vote217 views1 answer
Vba paste values
VBA
1 vote211 views1 answer
Add control vb
VBA
8 votes354 views1 answer
Excel vba make a short integer from two bytes
VBA
0 vote200 views1 answer
Vbnet line graph smooth lines
VBA