Hi
I am trying to use the Worksheet_SelectionChange function to trigger an action when a particular cell is modified.
This particular cell address is:
Worksheets("Site Inspection"
.Range("PropertyName"
.Address
What's wrong in the code below?
Is there another way to trigger changes when only 1! cell is modified?
Thanks.
=======================
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range(Target).Address = Worksheets("Site Inspection"
.Range("PropertyName"
.Address
MsgBox "Critical Cell Modified"
Else
MsgBox "Non-Critical Cell Modified"
End If
On Error Resume Next
End Sub
I am trying to use the Worksheet_SelectionChange function to trigger an action when a particular cell is modified.
This particular cell address is:
Worksheets("Site Inspection"
What's wrong in the code below?
Is there another way to trigger changes when only 1! cell is modified?
Thanks.
=======================
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range(Target).Address = Worksheets("Site Inspection"
MsgBox "Critical Cell Modified"
Else
MsgBox "Non-Critical Cell Modified"
End If
On Error Resume Next
End Sub