Change vba from move EntireRow to moving 1 cell

I have a piece of code that moves an entire row to the bottom of the data and then moves the whole data up by 1. Basically it cycles the data when you click a button. However, because of an audit trail that only picks up changes made to one cell, I need to change this code so that it does the following:

'A3' moves to end of data. Data shifts up by one.

My current code which moves entire row is:

Sub MoveRowToEnd()
Rows(3).Cut
Range("a3").End(xlDown).Offset(1, 0).EntireRow.Insert

End Sub

Basically, just moving one cell instead of the entire row.

Thanks in advance!