If you are only looking at moving Row 2 to the last position (without
shifting cells) then try the below code.

Sub Macro()
Rows(2).Cut Rows(Range("A" & Rows.Count).End(xlUp).Row + 1)
End Sub

If this post helps click Yes
---------------
Jacob Skaria


"Max2073" wrote:

Hi,

I would like to create a macro that moves the second row to the last row in
the worksheet. The worksheet varies in the number of rows and I can not work
out if this is possible or how to do it.