if that doesn't do it for you could use a Worksheet_Change & selection_change event to track the required changes - but you would need some kind of backing list.
'IN SHEET1'S WORKSHEET MODULE
Public MyInitialValue
Private Sub Worksheet_Change(ByVal Target As Range)
'IM USING SHEET2 AS A BACKING/TRACKING SHEET
i = 1
Do Until Sheet2.Cells(i, 3).Value = ""
i = i + 1
Loop
Sheet2.Cells(i, 1).Value = Target.Address
Sheet2.Cells(i, 2).Value = MyInitialValue
Sheet2.Cells(i, 3).Value = Target.Value
Sheet2.Cells(i, 4).Value = Date
Sheet2.Cells(i, 5).Value = Application.UserName
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
MyInitialValue = Target.Value
End Sub