To do this (in the attach in previous post), put a wrong formula in the cell. How IFFF = (B2 = 3; "true", "false"). So I created a macro that fixes it.

Sub XXX()
Selection.Replace What:="IFFF(", Replacement:="IF(", LookAt:=xlPart, _
SearchOrder:=xlByColumns, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
End Sub

The result is a correct formula but is not recognized by Excel like a formula.
How can I fix this by macro?