Add New Row with formulaes

Hello friends

I have a "Add new Row" button that adds a new row at the top of the sheet. My code is

Private Sub CommandButton1_Click()

Rows("14:14").Select
Selection.Insert Shift:=x1Down

End Sub

Although it adds a new row at the top, it does not add the formulaes in some of the cells - even the simple ones such as "=B16"

What do I have to do to get the formulaes as well in the new row ?

Thanks for your help.