FarPoint.Win.Spread.Model.ICustomNameSupport cns;
cns = (FarPoint.Win.Spread.Model.ICustomNameSupport)fpSpread1.ActiveSheet.Models.Data;
cns.AddCustomName("ALPHA", new FarPoint.CalcEngine.DoubleExpression(20));
fpSpread1.ActiveSheet.SetFormula(1, 1, "ALPHA");
FarPoint.Win.Spread.Model.ICustomNameSupport2 cns2;
cns2 = (FarPoint.Win.Spread.Model.ICustomNameSupport2)fpSpread1.ActiveSheet.Models.Data;
cns2.ClearCustomNames();
fpSpread1.ActiveSheet.RecalculateAll();
Dim cns As FarPoint.Win.Spread.Model.ICustomNameSupport
cns = FpSpread1.ActiveSheet.Models.Data
cns.AddCustomName("ALPHA", New FarPoint.CalcEngine.DoubleExpression(20))
FpSpread1.ActiveSheet.SetFormula(1, 1, "ALPHA * 2")
Dim cns2 As FarPoint.Win.Spread.Model.ICustomNameSupport2
cns2 = FpSpread1.ActiveSheet.Models.Data
cns2.ClearCustomNames()
FpSpread1.ActiveSheet.RecalculateAll()