Here is what I have:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Range("S7:S37"), Target) Is Nothing Then
Worksheets("Daily Log of Students Seen").Range("S38").Value =
ActiveCell.Value
End If
End Sub

But, this causes Cell S38 to equal the cell in the target range that is
entered. I actually want something else to happen. Once I intercept a cell
in the target range and change it, I want Cell S38 to take the value of the
changed cell once I exit it.


--
Thanks
Shawn