Let's assume that hits means any data is entered into.
In Sheet2's worksheet code enter:


Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Cells(10, "A")) Is Nothing Then
Else
Worksheets("Sheet1").Activate
MsgBox ("STOP")
End If
End Sub
--
Gary''s Student

"TimN" wrote:

How would I write code for the following situation. Say I have a workbook
with two sheets. Whenever any data hits cell A10 in Sheet2, I would like a
MsgBox to pop up in Sheet1 saying Stop!

Thanks for any suggestions.