Macro to copy and insert down several rows in protected sheet

Hello

I have a sheet that contains formulas and is protected (password "43215")

I need a VBA code so that the user can select one or several rows , Insert them down WITH The formulas

Can anyone help ?

Thanks