Application VisualBasic Script

Sub DisableCell()
    CommandBars("Cell").Enabled = False
End Sub