something like this

ActiveCell.Offset(1, 0).EntireRow.Insert
Range("property").Copy ActiveSheet.Range("A" & ActiveCell.Row + 1)


"Karen McKenzie" wrote:

I'm hoping someone can help me.
I'd like to know what code I need to insert a row below the current line I'm
working in, then to copy all formulae and formats from A50:AM50 (named range
"property") and paste this into the same columns in the row that has been
inserted.