Not sure if you want to use cut or copy, so here are both options:

Sheets("Sheet1").Range("A4:XX4").Cut
Destination:=Sheets("Sheet2").Range("A1")

Sheets("Sheet1").Range("A4:XX4").Copy
Destination:=Sheets("Sheet2").Range("A1")

Regards,
Per

"Philosophaie" skrev i meddelelsen
...
I am trying to move a row from Sheet2 to sheet1. I keep getting an error
in
my first attempt:

Sheets("Sheet1").Range("A4:XX4") = Sheets("Sheet2").Range("A1:XX1")

Error code:
Application-defined or object-defined error