HI jw01,

You can allow cell formatting while sheet protection, see below code

    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
        , AllowFormattingCells:=True

Regards,
DILIPandey
<click on below * if this helps>