Is there a way to protect and hide cells with formula

[liabilityquek]

Hi

Is there a way to protect and hide cells with formula using VBA while editing other cells? Currently I am using this code which does not allow me to editing some of the cells.

Sub HideFormula()

Selection.Locked = True
Selection.FormulaHidden = True
ActiveSheet.Protect Password:="1234"

End Sub

 

[DanteAmor]

Select the cells you want to protect and hide.
Change the cell format and mark Locked and Hidden:

 

[liabilityquek]

Select the cells you want to protect and hide.
Change the cell format and mark Locked and Hidden:

thanks Dante for the revert. i tried finding the solution on how to protect selective cells and the solution is pretty much the same as your approach. Tried using the approach and seems like the whole worksheet is still locked.

 

[DanteAmor]

The cells that you do not want with blocking you must uncheck Locked and Hidden.