I am getting the following error (copy method of range class failed) when using the code below:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 14 Then Target.EntireRow.Copy Destination:=Sheets("Audit").Range("A" & Rows.Count).End(xlUp) = Format(Now(), "dd/mm/yyyy hh:mm:ss")
End Sub
What I want do so is:
If column N30 to N(x) changes in value
1) Copy the entire row to a worksheet called "Audit"
2) Append the timestamp to the row so I know when the change occurred as the row value (column N) may change more than one time.
I try using the code above and I get the error described above. Where is my syntax wrong. Thank you.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 14 Then Target.EntireRow.Copy Destination:=Sheets("Audit").Range("A" & Rows.Count).End(xlUp) = Format(Now(), "dd/mm/yyyy hh:mm:ss")
End Sub
What I want do so is:
If column N30 to N(x) changes in value
1) Copy the entire row to a worksheet called "Audit"
2) Append the timestamp to the row so I know when the change occurred as the row value (column N) may change more than one time.
I try using the code above and I get the error described above. Where is my syntax wrong. Thank you.