VBA Code to copy formula from above row, already have macro to add row

[Chris9999]

Hi,
My macro inserts a row but I am finding that not all of the formulas are on the new row. The line above and below the inserted line have the formulas in the cells. The data validation cells in the new row work fine with the current macro, it is only my sumif formulas that do not appear to be copied to the new row.

Any Suggestions?

Sub Insert_Rows()
' Insert_Rows Macro
Application.ScreenUpdating = False
ActiveSheet.Unprotect Password:="XXXX"
ExtraRows = Range("N1")  '****** edit to suit
Rows(39 + ExtraRows).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Range("N1") = Range("N1") + 1
ActiveSheet.Protect Password:="XXXX"
End Sub

Also, was the VBA code properly entered in thread?

Thank you for your help,
Chris

 

[Chris9999]

Just to clarify. I have 10 columns and my last row to enter data is 38, when run the Insert Rows macro, the row gets added and the first four columns copies the data validation from the previous row into the row 39, this is perfect. Then I have an amount column and two total columns that the formula is not copying to the new row. Any ideas.
Thank you very much for your help. I have been struggling with this some time.
Chris