Thanks for the reply mancubus,

I have got it working using...

    Range("C8:O8").Copy
    With ActiveSheet.Range("C" & Rows.Count).End(xlUp).Offset(1, 0)
        .PasteSpecial Paste:=xlPasteValues
    End With
I just thought there might have been a one line solution.

Thanks again.