Consistently add new row above

Hi. I would like to have a simple macro that automatically adds a new row above the entry row. Unless there is a better way to have the most current entry on top without having to constantly sort.

Also I would like to have formulas added to new row. See attached example.

Thank you.

Peter