Macro to delete inserted row

The following formula enables me to insert a row whenever I make a new entry in the A column.

Please Login or Register  to view this content.

However, I now need to put in another macro to remove the last inserted row whenever an entry is removed from the A column. I don't know how to write the macro to accomplish this function. I think the above code information may be enough to determine how the new code should be written. Please let me know if there is more information to share in order to solve this problem.

record a macro,
run the delete
stop the macro,
edit the macro.

remove any text of a hard defined cell reference, like Range("a1") and replace it with ACTIVECELL.

If you are deleting a row, then where it says Rows("4:4"), change to:
r = activecell.row
Rows(r & ":" & r)

I'm sorry, I don't know how to code the macro to delete the last row with formulas whenever a value in Column A has been erased or cleared. As it is right now, another new row is created whenever I delete a value from one of the cells on column A. It keeps compounding and I do not want that!

I apologize. I realize now that a new row does NOT get inserted after a value is cleared from the A column. Instead, what happens is that the row #11 was inserted AFTER I added a value "gg" in the A5 cell (see Before file example). But when I cleared the A5 cell, row #11 still remains there (see After file example).

Would be perfect if that colored row #11 also goes away when the value is removed from the A5 cell.

Every time I add a new value to the A column, a new colored row with formulas gets inserted. But those inserted rows will never go away unless I manually delete them. If I give this protected workbook to a novice user, the Miscellaneous Activities worksheet could end up having rows and rows of colored rows if they keep removing values in the A column.