Can help me with VBA??

[jovie]

Private Sub Worksheet_Change(ByVal Target As Range)

Dim rng As Range

Set rng = Target.Parent.Range("Moving_Stock_out")

If Target.Count > 1 Then Exit Sub

If Intersect(Target, rng) Is Nothing Then Exit Sub
Target.Offset(, 15).Value = Date

End Sub

This code is perfectly working, however, only when I manually edit the cell, the date will update. because I have write formula for the target range, when it changes due to the formula, this code is not working, can anyone help me with that?
just when the target cell changes no matter due to my manual edit or formula, it will update the date.
Really thanks a lot.

 

[RoryA]

Please stick to your original thread and do not duplicate questions. Thread closed.