Sheets("Deleted").Range("A" & xLastRow & ":Q" & xLastRow).ClearContents

Tim wrote:

Try to add this line to your code:

Sheets("Deleted").Range("A" &
xLastRow&:"Q"&xLastRow).ClearContents

Tim

"Haxer" wrote:

I am trying to cut information from a known set of columns (A:Q) with a
variable row and move them to a known set of columns (A:Q) with a variable
row. I think it should look something like this:

Sheets("Deleted").Range("A" &
xLastRow&:"Q"&xLastRow)=Sheets("Data").Range("A" & i:"Q"&i)

Actually what I have above is when I was trying to copy. I am no longer
trying to copy but actually cut and paste.

Any help please?

--

Dave Peterson