Sorry i shouldve made notations, (the notated ranges in text are reference to code)

Basically I have formula in the 'First Range' taking data from another sheet, the 'First Range' contains 16 rows, the data those rows contain come from 8 rows on another sheet (data is concatenated and moved to where it should be so is required to take up 2 rows per original row)

The 'Paste Range' moves the data into columns that do not affect the printable area of the and moves the rows down by 8 so that the formula then follow on directly after the 'First Range' ie. if the first cell in the 'First Range' was ='Sheet2'!A1 then through copying it would become ='Sheet2'!O9. not the final result I need but it adjusts the rows correctly.

When Cutting the formulae do not change as per their new position so that the 'Cut Range' does not change the formulae but aligns the new formulae with the final destination rows. They still have wrong columns though and this is where the 'Final Range' comes in, it copies back to original columns and new rows so that the 'Final Range' has formulae carrying on directly from the 'First Range'

Thinking about it the areas outside the print area would need to be cleared of borders, colours and data after the process.

Hope ive explained it clearly now

Code:

```
Sub Macro1()
'First Range
Range("A13:M29").Select
Application.CutCopyMode = False
Selection.Copy
'Paste Range
Range("O21").Select
Application.CutCopyMode = False
'Cut Range
Range("O21:AA37").Cut Destination:=Range("O50:AA66")
Range("O50:AA66").Select
Selection.Copy
'Final Range
Range("A50").Select
ActiveSheet.Paste
End Sub
```