VBA To Protect Sheet With Certain Permissions

[data808]

Right now I am using this to protect a sheet in my VBA code:

ActiveSheet.Protect Password:="hello"

But it removes all access to the Home tab in the ribbon. I would like the user to still be able to use the font color and size controls. Along with inserting/deleting rows. Does anyone know how to do this?

Thanks.

 

[SunnyAlv]

Try this

All of these accesses are useful for doing anything in the protected activesheet, and if you don't want any of those accesses to be done in the protected activesheet change "TRUE" to "FALSE"
change it as you wish

ActiveSheet.Protect Password:="hello", DrawingObjects:=False, Contents:=True, Scenarios:= _
        False, AllowFormattingCells:=True, AllowFormattingColumns:=True, _
        AllowFormattingRows:=True, AllowInsertingColumns:=True, AllowInsertingRows _
        :=True, AllowInsertingHyperlinks:=True, AllowDeletingColumns:=True, _
        AllowDeletingRows:=True, AllowSorting:=True, AllowFiltering:=True, _
        AllowUsingPivotTables:=True

*If there’s any unclear information please let me know

 

[data808]

Try this

All of these accesses are useful for doing anything in the protected activesheet, and if you don't want any of those accesses to be done in the protected activesheet change "TRUE" to "FALSE"
change it as you wish

ActiveSheet.Protect Password:="hello", DrawingObjects:=False, Contents:=True, Scenarios:= _
        False, AllowFormattingCells:=True, AllowFormattingColumns:=True, _
        AllowFormattingRows:=True, AllowInsertingColumns:=True, AllowInsertingRows _
        :=True, AllowInsertingHyperlinks:=True, AllowDeletingColumns:=True, _
        AllowDeletingRows:=True, AllowSorting:=True, AllowFiltering:=True, _
        AllowUsingPivotTables:=True

*If there’s any unclear information please let me know

Works like a charm. Thank you so much.