hi
simple task
Sub moveit()
Range("A2:G2").Copy
Range("A65000").End(xlUp).Offset(1, 0).PasteSpecial xlPasteAll
End Sub

regards
FSt1

"Dave" wrote:

I want to put data into cells A2:G2. I then with the help of a macro button,
copy that data into the next available empty row, the first time i press the
button it will appear in rows A3:G3, then if i press it again the contents of
cells A2:G2 will appear in A4:G4 and so on..... any help please???