Hi Guys,

I have a table on my spread sheet, I'm trying to use a macro to move the five totals at the bottom down and insert a new blank section ready for filling in. I don't know where to start with VBA so I've recorded this manually as a macro.

Surprise surprise it isn't working and isn't pushing the totals down correctly so they get overwritten, can someone please let me know when I'm doing wrong.

Sub Macro9()
'
' Macro9 Macro
'

'
    Range("I34:I38").Select
    Selection.Cut Destination:=Range("I38:I42")
    Range("I38:I42").Select
    Sheets("Sheet1").Select
    Selection.Copy
    Sheets("InvoiceSheet").Select
    Range("A34").Select
    ActiveSheet.Paste
    Range("C44").Select
End Sub
Thank you!!