expression.UnlockedFormulaCells
expression Required. An expression that returns one of the objects in the Applies To list.
Example
In the following example, the AutoCorrect Options button appears for cell A3, an unlocked cell containing a formula.
Sub CheckUnlockedCell()
Application.ErrorCheckingOptions.UnlockedFormulaCells = True
Range("A1").Value = 1
Range("A2").Value = 2
Range("A3").Formula = "=A1+A2"
Range("A3").Locked = False
End Sub