VBA code if value is typed or pasted in a cell then current date is returned

Hi!

I have a sheet that is automatically populated from another sheet that is triggered by the user. I need the corresponding cell in column E to give the current date if a cell in Column A (starting from A4) is not empty (if a value has been typed or entered). In the same manner, column F should give the "tab name".

Example:
Tab name is "Terminated"
Column A is Employee Id
Column E is date of termination
Column F is Employee Status (need to have this column for other reports)

I have a macro button to automatically move employees from the "Active" tab to the "Terminated" tab. Once moved (I assume this is being copy-pasted but in case macro fails or user wants to type manually, I need it to work either way) I need column E to have the termination date and column F the employee status (which can be copied from Tab name or can also be specified in the code -- whatever works easiest)

I mentioned "typed or entered" because I have read from other sites that sometimes the macro does not run if value is pasted.

Thank you in advance!

Maybe you can work with this:

Please Login or Register  to view this content.

to be placed in a worksheet module.

Cheers
Erwin

Strange, for me the pasting is working, but the line CurRow = ActiveCell.Row - 1,
has to change into

Please Login or Register  to view this content.

Cheers
Erwin

That, was a requirement you did not ask, but here you are:

Please Login or Register  to view this content.

Cheers
Erwin

Something strange is going on then.
Please could you upload your workbook, without confidential data of course, with the code that gives an error?

Cheers
Erwin

Sheet changes caused by VBA don't trigger worksheet change events. You may want to incorporate the code into your existing module.

@Arkadi, I agree with you, but the OP didn't specify that.
@Roux11, perhaps if you add these lines just before the "EntireRow.Delete"-line:

Please Login or Register  to view this content.

cheers
Erwin

@Eastw00d no worries! It wasn't a negative comment, I was just explaining it to the OP

my mistake, it should be:

Please Login or Register  to view this content.

Cheers
Erwin