Need to insert date and user when Event macro happend

I have this code that is working perfectly. When any row in column 14 becomes "Closed" The entire row is cut and pasted into the "Closed" worksheet. What I am trying to figure out is how to make the date and user get inserted in column 15 and the corresponding row to the "Closed" event. Any help would be greatly appreciated.

Private Sub Worksheet_Change(ByVal Target As Range)

 Application.EnableEvents = False

  If Target.Column = 14 Then

   If Target = "Closed" Then

            
     nxtRw = Sheets("Closed").Range("A" & Rows.Count).End(xlUp).Row + 1
             
      Target.EntireRow.Copy Destination:=Sheets("Closed").Range("A" & nxtRw)

      Target.EntireRow.Delete shift:=xlUp
   End If
  End If

 Application.EnableEvents = True
 

End Sub