Macro to Auto Update Cell to Current Date

[matttleong]

The goal is a macro that will update the date anytime a cell in that row is changed. The following macro will input a current date into column 2 of the current row anytime a cell (other than in column 2) was “changed”. The problem I have is that this subroutine is activated anytime the cell is double clicked, even if nothing was changed. This is a built in subroutine already provided by excel that is triggered on the double click. I need a way to avoid changing the date column if nothing was changed. Any help is appreciated. Thanks

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 2 Then
    Cells(Target.Row, 2) = Date
End If
End Sub